Amiga Plus 1999 #3/Amiga Plus CD - 1999 - No. 3.iso/Anwender/Grafik/Picasso96Install/InstallPicasso96

Text File | 1998-02-08 | 108KB | 3,346 lines

;-----------------------------------------------------------------------------
; Script to install Picasso96
;
; $VER: InstallPicasso96 1.13 (14.12.97)
;
;    :ts=3
;
; - by Tobias Abt ([e-mail])
; - modified and updated by Jens Langner ([e-mail])
; - french translation by Cédric Quillevere ([e-mail])
; - italian translation by Mario Dell'Oca ([e-mail])
; - swedish translation by Henrik Isaksson ([e-mail])
;
;-----------------------------------------------------------------------------

;=============================================================================
; Configuration defaults
;=============================================================================

(set #Name                        "Picasso96")
(set #MinSysVersion            39)
(set #LibsDefaultPath        "SYS:Libs")
(set #MonitorsDefaultPath    "SYS:Devs/Monitors")
(set #SettingsDefaultName    "SYS:Devs/Picasso96Settings")
(set #PrefsDefaultPath        "SYS:Prefs")
(set #MainPath                    "Picasso96")
(set #MainDefaultPath        "Work:")

(set #CyberVision64Bit        1)
(set #CyberVision3DBit        2)
(set #DominoBit                4)
(set #GraffityBit                8)
(set #InfernoBit                16)
(set #MerlinBit                32)
(set #oMniBusBit                64)
(set #PicassoIIBit            128)
(set #PicassoIVBit            256)
(set #PiccoloBit                512)
(set #PiccoloSD64Bit            1024)
(set #Pixel64Bit                2048)
(set #RetinaBLTZ3Bit            4096)
(set #SpectrumBit                8192)
(set #uaegfxBit                16384)

(set #ModeInstall                0)
(set #ModeUpdate                1)
(set #ModeUninstall            2)

;=============================================================================
; English strings
;=============================================================================

(if
    (= @language "english")
    (
    ; startup message
        (set #StartupMsg1
            (cat
                "Picasso96 is a complex piece of software and requires some experience to install and configure. "
                "If you are a beginner with the Amiga and already have a working environment for your graphics board, "
                "you might think twice before installing Picasso96! "
                "This version of Picasso96 is a snapshot of the development and works on most systems. However, your "
                "system may differ in some aspects and this version of Picasso96 might fail to work on your Amiga. "
                "So, please, backup your current system configuration before installing Picasso96! "
            )
        )
        (set #StartupMsg2
            (cat
                "Before you go on, please disable your current graphics board drivers and reboot, if there is any. "
                "Otherwise your system will probably refuse to work correctly afterwards. "
                "Because of the complexity of the different systems available, we can not perform this action "
                "automatically and chose to ask you to do this. Please refer to the manuals of your current "
                "driver software or read the appropriate section of the Picasso96 manual. "
            )
        )
        (set #StartupMsg3
            (cat
                "Please read the documentation before installing Picasso96. Setup and configuration of graphics drivers "
                "is not trivial and should be done with certain things kept in mind. Do you want to read the manual now? "
            )
        )
        (set #StartupHelp3
            (cat
                "Please read the documentation! This might help you to avoid some trouble!"
            )
        )

    ; Errors
        (set #Err-Bad-Kick "You need at least KickStart 3.0 to run Picasso96!")
        (set #Err-Bad-CPU "You need at least a Motorola M68020 CPU to run Picasso96!")
        (set #Err-No-Boards "You really should have selected at least one board type!")
        (set #Err-No-UpdateScript "Could not find update script from previous installation, please back up configuration files and reinstall!")
        (set #Err-No-DeleteScript "Could not find update script from previous installation, please remove manually.")

    ; Warnings
        (set #Warning-NoBoards
            (cat
                "It seems that your Amiga has no compatible Amiga graphics board installed!\n\n"
                "Compatible graphics cards are:\n\n"
                "CyberVision64 - Cybervision64/3D - Domino\nGraffity - Merlin - oMniBus\nPicassoII - PicassoII+ - PicassoIV\nPiccolo - Piccolo SD64 - RetinaBLTZ3\nSpectrum - uaegfx"
            )
        )

    ; Message
        (set #Message
            (cat
                "Thank you very much for choosing\n\n>> Picasso 96 <<\n\nas your graphics system.\n\n"
                "Picasso96 is the new system friendly environment for many different Amiga graphics boards\nby Tobias Abt & Alexander Kneer.\n\n\n\n"
                "Installscript ©1997 by Tobias Abt & Jens Langner\n\n"
            )
        )

    ; Install/Update
        (set #InstallMode "Do you want to install, update or uninstall Picasso96?")
        (set #InstallModeHelp
            (cat
                "Choosing Install will install Picasso96 with all configuration files,"
                "if you click update, your existing configuration files will not be touched."
            )
        )
        (set #Install "pFirst Install")
        (set #Update "Update an installed version")
        (set #UpdateSel "What do you want to update ?")
        (set #UpdateSelHelp
            (cat
                "Here you can select what you want to update in your Picasso96 installation."
            )
        )
        (set #UpUnGfx    "pGraphic card drivers")
        (set #UpUnLib    "Libraries")
        (set #UpUnPdt    "24bit picture.datatype")
        (set #UpUnPMd    "Picasso96Mode")
        (set #UpUnAppl    "Applications & Documentation")
        (set #UpUnDriv    "Special drivers")
        (set #UpUnMoni    "Monitorsettings")
        (set #UpUstart    "Modify User-Startup")

        (set #Uninstall        "Uninstall an installed version")
        (set #UninstallSel    "What do you want to uninstall ?")
        (set #UninstallSelHelp
            (cat
                "Here you can select what you want to remove from your Picasso96 installation."
            )
        )
        (set #AskUninstall    "Do you really want to uninstall the selected areas?")
        (set #AskUnyes            "Yes!")
        (set #AskUnno            "No!")
        (set #AskUninstallHelp
            (cat
                "If the installer will find any backups of a old installation before Picasso96,"
                "it will reinstall them."
            )
        )

        (set #InstEnd
            (cat
                "\nThe installation is finished now and the installer hopefully copied all packages to the right place.\n\n"
                "If you still got any problems, please check the following Webpages for help:\n\nhttp://picasso96.home.pages.de/\n"
                "http://www.villagetronic.com/amiga/\n\nThank you very much for choosing Picasso96\n\nYour Picasso96 Team...."
            )
        )
        (set #UpdEnd
            (cat
                "\nThe update procedure is finished now and hopefully all things are still working correct.\n\n"
                "If you got any problems, please check the following Webpages for help:\n\njhttp://picasso96.home.pages.de/\n"
                "http://www.villagetronic.com/amiga/\n\nThank you very much for updating Picasso96\n\nYour Picasso96 Team...."
            )
        )
        (set #UniEnd
            (cat
                "\nThe uninstall procedure is finished now and hopefully all selected packages are correctly removed.\n\n"
                "If you got any problems, please check the following Webpages for help:\n\nhttp://picasso96.home.pages.de/\n"
                "http://www.villagetronic.com/amiga/\n\nThank you very much for trying Picasso96. And we hope you soon will install it again\n\n"
                "Your Picasso96 Team...."
            )
        )

    ; Boards
        (set #AskBoards    "What kind of graphics board(s) do you want to use with Picasso96?")
        (set #AskBoardsUp    "For which graphics board do you want to update the drivers?")
        (set #AskBoardsUn    "For which graphics board do you want to uninstall the drivers?")
        (set #AskBoardsHelp
            (cat
                "Select those cards that you own, if you do not own any of them, "
                "you can not use Picasso96 yet. Ask the development team or the maker of your "
                "card(s) to build a suitable driver."
            )
        )

    ; Monitor
        (set #15kHzMonitor "p15 kHz")
        (set #31kHzMonitor "31 kHz")
        (set #35kHzMonitor "35 kHz")
        (set #38kHzMonitor "38 kHz")
        (set #48kHzMonitor "48 kHz")
        (set #57kHzMonitor "57 kHz")
        (set #64kHzMonitor "64 kHz")
        (set #AskMonitor "What horizontal scan rates can your monitor handle?")
        (set #AskMonitorHelp
            (cat
                "Look in the manuals of your monitors and look for the horizontal "
                "scan rates it can handle. They are specified like 30-38 kHz. "
                "Select the best matching choice."
            )
        )

    ; Libs
        (set #AskLibPath    "Where do you want to have the Picasso96 library files installed?")
        (set #AskLibPathUp  "Where do you have the Picasso96 library files installed?")
        (set #AskLibPathHelp
            (cat
                "If you are not absolutely sure what to choose, choose \""
                #LibsDefaultPath "\"!"
            )
        )
        (set #AskLibPathUser "Select another location")

        (set #SelectLibDir "Choose a directory for the Picasso96 library files.")
        (set #SelectLibDirUp "Choose the directory where you installed the files.")
        (set #SelectLibDirHelp
            (cat
                "This directory MUST be a part of your LIBS: assign!"
                "It has to be part of libs: before the monitors are launched."
                "Therefore, it is usually best to install them in SYS:libs."
            )
        )

    ; Monitor
        (set #AskMonitorPath    "Where do you want to have the monitor files of Picasso96 installed?")
        (set #AskMonitorPathUp  "Where do you have the monitor files of Picasso96 installed?")
        (set #AskMonitorPathHelp
            (cat
                "If you are not absolutely sure what to choose, choose \""
                #MonitorsDefaultPath "\"!"
            )
        )
        (set #AskMonitorPathMonitors #MonitorsDefaultPath)
        (set #AskMonitorPathUser "Select another location")

        (set #SelectMonitorDir        "Choose a directory for Picasso96's monitor files.")
        (set #SelectMonitorDirUp    "Choose the directory where the Picasso96 monitor file are placed.")
        (set #SelectMonitorDirHelp
            (cat
                "If you want to have Picasso96 started automatically during the"
                "system boot phase, it would be the best idea to put the monitor"
                "in \"" #MonitorsDefaultPath "\"."
            )
        )

    ; Prefs
        (set #AskPrefsPath    "Where do you want to have the Picasso96 preferences program \"Picasso96Mode\" installed?")
        (set #AskPrefsPathUp    "Where do you have the Picasso96 preferences program \"Picasso96Mode\" installed?")
        (set #AskPrefsPathHelp
            (cat
                "If you are not absolutely sure what to choose, choose \""
                #PrefsDefaultPath "\"!"
            )
        )
        (set #AskPrefsPathPrefs #PrefsDefaultPath)
        (set #AskPrefsPathUser "Select another location")

        (set #SelectPrefsDir    "Choose a directory for Picasso96Mode.")
        (set #SelectPrefsDirUp  "Choose the directory where you installed Picasso96Mode.")
        (set #SelectPrefsDirHelp
            (cat
                "It is usually a good idea to put Picasso96Mode in \"" #PrefsDefaultPath "\"."
            )
        )

    ; Settings
        (set #AskSettingsPath    "Where do you want to have the Picasso96 settings file installed?")
        (set #AskSettingsPathUp    "Where do have the Picasso96 settings file installed?")
        (set #AskSettingsPathHelp
            (cat
                "If you are not absolutely sure what to choose, choose \""
                #SettingsDefaultName "\"!"
            )
        )
        (set #AskSettingsPathDevs #SettingsDefaultName)
        (set #AskSettingsPathUser "Select another location")

        (set #SelectSettingsDir        "Choose a directory for the Picasso96 settings file.")
        (set #SelectSettingsDirUp    "Choose the directory where the Picasso96 settings file is placed.")
        (set #SelectSettingsDirHelp
            (cat
                "It is usually a good idea to store the settings as \"" #SettingsDefaultName "\"."
            )
        )
        (set #AskSettingsCopy "There is already a settings file!\nDo you want to keep the old one?")
        (set #AskSettingsCopyHelp
            (cat
                "Warning! If you select overwrite all current settings will be replaced with the default "
                "settings. Your old file will be moved to " #_settingsname ".bak"
            )
        )
        (set #Keep "Keep old")
        (set #Overwrite "Install new")

    ; Main
        (set #AskMainPath        "Where do you want to have the support files installed?")
        (set #AskMainPathUp    "Where are the support files installed?")
        (set #AskMainPathHelp
            (cat
                "If you are not absolutely sure what to choose, choose \"" (tackon #MainDefaultPath #MainPath) "\"!"
            )
        )
        (set #AskMainPathUser "Select another location")

        (set #SelectMainDir        "Where do you want to have the support files installed?\nA drawer named Picasso96 will be created there.")
        (set #SelectMainDirUp    "Where do you have the support files installed?")
        (set #SelectMainDirHelp
            (cat
                "A new drawer named Picasso96 will be created to hold the files."
                "An appropriate assign will be added to your user-startup file later."
            )
        )

    ; Copy
        (set #Picasso96HomeDir "Creating drawer for applications and scripts.")
        (set #Picasso96HomeDirHelp "The drawer created now holds the applications and the update and uninstall scripts.")
        (set #Picasso96Dir "Creating drawer for cards and chips.")
        (set #Picasso96DirHelp "The drawer created now holds the chip and card drivers and the main rtg.library.")
        (set #CopyPicasso96 "Installing Picasso96API.library.")
        (set #CopyPicasso96Help "This library is needed for Picasso96 applications.")
        (set #CopyRtg "Installing RTG system library.")
        (set #CopyRtgHelp "This library provides the graphics system functions.")
        (set #CopyFL "Installing fast layers library.")
        (set #CopyFLHelp "This library improves window movement performance.")
        (set #CopyPDT
            (cat
                    "Installing a new picture.datatype to SYS:Classes/Datatypes. "
                    "Your old one will be saved as SYS:Classes/Datatypes/picture.datatype.old "
                    "The new picture.datatype is absolutely required."
            )
        )
        (set #CopyPDTHelp
            (cat
                "The original AmigaOS V40 picture.datatype doesn't "
                "work with graphics boards. This will install a new one "
                "which has all the funtionality of the old one, but also can "
                "handle graphics boards. Your old picture.datatype will be saved "
                "as SYS:Classes/Datatypes/picture.datatype.old. "
            )
        )
        (set #CopyCard "Installing board driver for %s.")
        (set #CopyCardHelp "This driver is needed for at least one of your boards.")
        (set #CopyMonitor "Installing monitor driver for %s.")
        (set #CopyMonitorHelp "This driver is needed for at least one of your boards.")
        (set #MonitorToolType "Adjusting tooltypes for %s's monitor driver.")
        (set #MonitorToolTypeHelp "This step configures the monitor driver.")
        (set #CopyChip "Installing chipset driver for %s.")
        (set #CopyChipHelp "This driver is needed for at least one of your boards.")

        (set #CopyPicasso96Mode "Installing Picasso96Mode.")
        (set #CopyPicasso96ModeHelp "You will need Picasso96Mode to adjust your display settings.")
        (set #Picasso96ModeIconType "Adjusting the tooltypes of Picasso96Mode and its icon position.")
        (set #Picasso96ModeIconTypeHelp "The tooltypes of Picasso96Mode will reflect your choice about the location of the settings file.")

        (set #CopyEmuLib "Installing cross platform emulation library.")
        (set #CopyEmuLibHelp
            (cat
                "You will need this library to run programs "
                "written for other graphics board systems."
            )
        )

        (set #CopyPicasso96API "Installing Picasso96API.library")
        (set #CopyPicasso96APIHelp "The Picasso96API.library is needed for applications with direct Picasso96 support.")

        (set #CopyApps "Installing additional programs.")
        (set #CopyAppsHelp "During this step some utilities will be installed.")

    ; User-Startup
        (set #AddUserStartup "Performing changes to User-Startup.")
        (set #AddUserStartupHelp
            (cat
                "An assignment \""
                #MainPath
                ":\" will be added to your SYS:s/User-Startup file. "
                "This is primarily needed when updating Picasso96."
            )
        )

    ; Install
        (set #Msg-Installing "Installing Picasso96 files!")

    ; Update
        (set #Msg-Updating "Updating existing installation!")

    ; Delete
        (set #Msg-Deleting "Deleting existing installation!")

    ; Install Drivers
        (set #CopyDrivers "\nDo you want to have the application drivers copied to your harddisk?")
        (set #CopyDriversHelp "The drivers will be installed to the Picasso96 directory on your harddisk to allow easy on-demand installation.")
        (set #MsgInstallFromHD "\nPlease install the application drivers from the Picasso96 home dirctory or from the driver disk.")

    ; Install Patches
        (set #InstPrtPatch "\nDo you want to have the P96_PrinterPatch to be automatically started on Boot-Up ?")
        (set #InstPrtPatchHelp "This procedure will copy a project icon to your SYS:WBstartup to start the printer patch automatically.\nThis patch wil solve problems with printing on 24bit screens.")

    )
)

;=============================================================================
; German strings
;=============================================================================

(if
    (= @language "deutsch")
    (
    ; startup message
        (set #StartupMsg1
            (cat
                "Aufgrund des Umfanges und der Komplexität der Software erfordert Picasso96 einen erfahrenen "
                "Amiga Benutzer für die Installation und Konfiguration. Falls Sie sich mit dem Amiga noch "
                "nicht so gut auskennen und bereits eine zu Ihrer Zufriedenheit funktionierende Arbeitsumgebung "
                "besitzen, sollten Sie sich die Installation von Picasso96 noch einmal überlegen. "
                "Diese Version von Picasso96 stellt den augenblicklichen Stand der Entwicklung der Software dar "
                "und funktioniert auf den meisten Konfigurationen. Trotzdem kann es sein, daß es gerade auf "
                "Ihrem System nicht funktioniert. Deswegen sollten Sie auf jeden Fall vor der Installation eine "
                "Sicherung Ihres Systems durchführen! "
            )
        )
        (set #StartupMsg2
            (cat
                "Vor der weiteren Installation möchten wir Sie bitten, andere eventuell installierte "
                "Grafikkartentreiber zu deaktivieren und einen Warmstart durchzuführen, da Picasso96 "
                "sonst nicht zuverlässig arbeiten kann. "
                "Aufgrund der hohen Komplexität und Vielfalt unterschiedlicher Installationsformen "
                "können wir diesen Schritt leider nicht vollautomatisch durchführen und bitten "
                "deshalb Sie, dies manuell durchzuführen. Hinweise, wie das zu bewerkstelligen "
                "ist, entnehmen Sie bitte der Dokumentation ihres Systems oder auch dem entsprechenden "
                "Abschnitt in der Picasso96 Anleitung. "
            )
        )
        (set #StartupMsg3
            (cat
                "Bitte lesen Sie die Dokumentation bevor Sie Picasso96 installieren. Das Einrichten und die "
                "Konfiguration von Grafikkartentreibern ist leider nicht trivial und sollte erst durchgeführt "
                "werden, wenn man sich ein paar Gedanken gemacht hat.\n\nMöchten Sie die Dokumentation jetzt lesen? "
            )
        )
        (set #StartupHelp3
            (cat
                "Bitte lesen Sie die Dokumentation! Das kann Ihnen einigen Ärger ersparen!"
            )
        )

    ; Errors
        (set #Err-Bad-Kick "Sie benötigen mindestens KickStart 3.0 für Picasso96!")
        (set #Err-Bad-CPU "Sie benötigen mindestens eine Motorola M68020 CPU für Picasso96!")
        (set #Err-No-Boards "Sie hätten wirklich mindestens eine Grafikkarte auswählen sollen!")
        (set #Err-No-UpdateScript "Leider konnte kein Skript zum Aktualisieren von einer früheren Installation gefunden werden, bitte frisch installieren!")
        (set #Err-No-DeleteScript "Leider konnte kein Skript zum Entfernen von einer früheren Installation gefunden werden, bitte manuell entfernen!")

    ; Warnings
        (set #Warning-NoBoards
            (cat
                "Ihr Rechner scheint keine kompatible Grafikkarte installiert zu haben!\n\n"
                "Kompatible Grafikkarten sind momentan:\n\n"
                "CyberVision64 - Cybervision64/3D - Domino\nGraffity - Merlin - oMniBus\nPicassoII - PicassoII+ - PicassoIV\nPiccolo - Piccolo SD64 - RetinaBLTZ3\nSpectrum - uaegfx"
            )
        )

    ; Message
        (set #Message
            (cat
                "Vielen Dank, daß Sie\n\n>> Picasso96 <<\n\n als Ihr Grafikkartensystem gewählt haben.\n\n"
                "Picasso96 ist die neue systemfreundliche Software für fast alle Amiga-Grafikkarten\nvon Tobias Abt und Alexander Kneer.\n\n\n\n"
                "Installskript ©1997 - Tobias Abt & Jens Langner\n\n"
            )
        )

    ; Install/Update
        (set #InstallMode "Wollen Sie Picasso96 installieren, aktualisieren oder entfernen?")
        (set #InstallModeHelp
            (cat
                "Wenn Sie Installieren wählen, wird Picasso96 mit allen Konfigurationsdateien installiert,"
                "wenn Sie Aktualisieren wählen, werden Ihre Konfigurationsdateien nicht verändert."
            )
        )
        (set #Install "pErste Installation")
        (set #Update "Bestehende Version aktualisieren")
        (set #UpdateSel "Was möchten Sie gerne aktualisieren ?")
        (set #UpdateSelHelp
            (cat
                "Hie können Sie auswählen, welche Teile des Packetes sie aktualisieren möchten auf Ihrer"
                "Festplatte."
            )
        )
        (set #UpUnGfx    "pGrafikkarten Treiber")
        (set #UpUnLib    "Bibliotheken")
        (set #UpUnPdt    "24bit Picture.datatype")
        (set #UpUnPMd    "Picasso96Mode")
        (set #UpUnAppl    "Zubehördateien & Dokumentation")
        (set #UpUnDriv    "Spezielle Treiber")
        (set #UpUnMoni    "Monitoreinstellungen")
        (set #UpUstart    "Modifiziere User-Startup")

        (set #Uninstall        "Bestehende Version entfernen")
        (set #UninstallSel    "Was möchten Sie entfernen ?")
        (set #UninstallSelHelp
            (cat
                "Sie können nun wählen, welche Teile der Installation Sie löschen möchten."
            )
        )
        (set #AskUninstall    "Möchten Sie wirklich die von Ihnen gewählten Bereiche löschen?")
        (set #AskUnyes            "Ja!")
        (set #AskUnno            "Nein!")
        (set #AskUninstallHelp
            (cat
                "Wenn der Installer irgendwelche gesicherten Dateien finden sollte, die vor"
                "Picasso96 existierten, wird er diese an den alten Platz zurückkopieren."
            )
        )

        (set #InstEnd
            (cat
                "\nDie Installation ist nun abgeschlossen und der Installer hat hoffentlich alles an den richtigen Platz kopiert.\n\n"
                "Wenn Sie dennoch Probleme haben sollten, finden Sie auf folgenden WebSeiten Hilfe:\n\nhttp://picasso96.home.pages.de/\n"
                "http://www.villagetronic.com/amiga/\n\nDanke, daß Sie Picasso96 gewählt haben.\n\nIhr Picasso96 Team...."
            )
        )
        (set #UpdEnd
            (cat
                "\nDas Update ist nun abgeschlossen und hoffentlich funktioniert alles wie vorgesehen.\n\n"
                "Wenn Sie Probleme haben sollten, finden Sie auf folgenden WebSeiten Hilfe:\n\nhttp://picasso96.home.pages.de/\n"
                "http://www.villagetronic.com/amiga/\n\nDanke für das Update von Picasso96\n\nIhr Picasso96 Team...."
            )
        )
        (set #UniEnd
            (cat
                "\nDie Deinstallation is nun abgeschlossen und hoffentlich sind alle gewählten Pakete korrekt entfernt worden.\n\n"
                "Wenn Sie Probleme haben sollten, finden Sie auf folgenden WebSeiten Hilfe:\n\nhttp://picasso96.home.pages.de/\n"
                "http://www.villagetronic.com/amiga/\n\nWir danken Ihnen, daß Sie Picasso96 benutzt haben, und hoffen,\n"
                "Sie zu einem späteren Zeitpunkt wieder als Anwender gewinnen zu können.\n\n"
                "Ihr Picasso96 Team...."
            )
        )

    ; Boards
        (set #AskBoards        "Welche Grafikkarten wollen Sie mit Picasso96 verwenden?")
        (set #AskBoardsUp        "Für welche Grafikkarten möchten Sie die Treiber aktualisieren?")
        (set #AskBoardsUn        "Für welche Grafikkarten möchten Sie die Treiber deinstallieren?")
        (set #AskBoardsHelp
            (cat
                "Wählen Sie die Karten, die Sie besitzen. Wenn Sie keine der angegebenen "
                "besitzen, können Sie Picasso96 leider noch nicht benutzen. Fragen Sie das "
                "Entwicklerteam oder den Hersteller Ihrer Grafikkarte nach einem passenden Treiber."
            )
        )

    ; Monitor
        (set #15kHzMonitor "p15 kHz")
        (set #31kHzMonitor "31 kHz")
        (set #35kHzMonitor "35 kHz")
        (set #38kHzMonitor "38 kHz")
        (set #48kHzMonitor "48 kHz")
        (set #57kHzMonitor "57 kHz")
        (set #64kHzMonitor "64 kHz")
        (set #AskMonitor "Welche Horizontalfrequenz kann Ihr Monitor handhaben?")
        (set #AskMonitorHelp
            (cat
                "Sehen Sie im Handbuch Ihres Monitors nach, für welche Horizontalfrequenzen "
                "er ausgelegt ist. Dort finden Sie zum Beispiel eine Angabe wie 30-38 kHz. "
                "Wählen Sie die Möglichkeit aus, die am besten zu Ihren Monitor paßt, ohne "
                "ihn zu überfordern."
            )
        )

    ; Libs
        (set #AskLibPath    "Wo sollen die Funktionsbibliotheken für Picasso96 installiert werden?")
        (set #AskLibPathUp  "Wo sind die Funktionsbibliotheken von Picasso96 installiert?")
        (set #AskLibPathHelp
            (cat
                "Die Funktionsbibliotheken müssen in das Verzeichnis kopiert werden, auf welches "
                "der Assign Libs: während des Startvorgangs (vor User-Startup!) zeigt. "
                "Im Zweifelsfall nehmen Sie einfach " #LibsDefaultPath "!"
            )
        )
        (set #AskLibPathUser "Einen anderen Ort wählen")

        (set #SelectLibDir    "Wählen Sie ein Verzeichnis für die Funktionsbibliotheken von Picasso96.")
        (set #SelectLibDirUp    "Wählen Sie das Verzeichnis mit den Funktionsbibliotheken von Picasso96.")
        (set #SelectLibDirHelp
            (cat
                "Dieses Verzeichnis MUSS ein Teil Ihrer LIBS: Zuweisung sein!"
                "Es muß zu dem Zeitpunkt verfügbar sein, zu dem die Monitordateien gestartet werden."
                "Deshalb ist es meistens am besten, die Dateien in SYS:Libs zu installieren."
            )
        )

    ; Monitor
        (set #AskMonitorPath    "Wo sollen die Monitor-Dateien für Picasso96 installiert werden?")
        (set #AskMonitorPathUp  "Wo haben Sie die Monitor-Dateien für Picasso96 installiert?")
        (set #AskMonitorPathHelp
            (cat
                "Wenn Sie nicht wirklich ganz genau wissen, wie Sie sich entscheiden sollen, wählen Sie \""
                #MonitorsDefaultPath "\"!"
            )
        )
        (set #AskMonitorPathMonitors #MonitorsDefaultPath)
        (set #AskMonitorPathUser "Einen anderen Ort wählen")

        (set #SelectMonitorDir        "Wählen Sie ein Verzeichnis für die Monitor-Dateien von Picasso96.")
        (set #SelectMonitorDirUp    "Wählen Sie das Verzeichnis in dem die Monitor-Dateien installiert sind.")
        (set #SelectMonitorDirHelp
            (cat
                "Wenn Picasso96 während der Systeminitialisierung gestartet werden soll, ist"
                "es am besten, die Monitor Dateien nach \"" #MonitorsDefaultPath "\"zu kopieren."
            )
        )

    ; Prefs
        (set #AskPrefsPath    "Wo soll \"Picasso96Mode\", das Programm zur Einstellung der Auflösungen, installiert werden?")
        (set #AskPrefsPathUp    "Wo ist \"Picasso96Mode\", das Programm zur Einstellung der Auflösungen, installiert?")
        (set #AskPrefsPathHelp
            (cat
                "Wenn Sie nicht genau wissen, was Sie wollen, nehmen Sie \""
                #PrefsDefaultPath "\"!"
            )
        )
        (set #AskPrefsPathPrefs #PrefsDefaultPath)
        (set #AskPrefsPathUser "Einen anderen Ort wählen")

        (set #SelectPrefsDir    "Wählen Sie ein Verzeichnis für Picasso96Mode.")
        (set #SelectPrefsDirUp  "Wählen Sie das Verzeichnis von Picasso96Mode.")
        (set #SelectPrefsDirHelp
            (cat
                "Es ist normalerweise nicht schlecht, Picasso96Mode nach \"" #PrefsDefaultPath "\"zu kopieren."
            )
        )

    ; Settings
        (set #AskSettingsPath    "Wo soll die Datei für die Bildschirmauflösungen gespeichert werden?")
        (set #AskSettingsPathUp    "Wo ist die Datei für die Bildschirmauflösungen installiert worden?")
        (set #AskSettingsPathHelp
            (cat
                "Wir empfehlen \""
                #SettingsDefaultName "\"."
            )
        )
        (set #AskSettingsPathDevs #SettingsDefaultName)
        (set #AskSettingsPathUser "Einen anderen Ort wählen")

        (set #SelectSettingsDir        "Wählen Sie ein Verzeichnis für die Datei der Bildschirmauflösungen.")
        (set #SelectSettingsDirUp    "Wählen Sie das Verzeinis in dem die Datei der Bildschirmauflösungen ist.")
        (set #SelectSettingsDirHelp
            (cat
                "Unser Vorschlag ist \"" #SettingsDefaultName "\"."
            )
        )
        (set #AskSettingsCopy "Es gibt schon so eine alte Datei mit Bildschirmauflösungen!\nWollen Sie die alte behalten?")
        (set #AskSettingsCopyHelp
            (cat
                "Achtung! Wenn Sie überschreiben wählen, dann werden die jetzigen Einstellungen "
                "mit den ausgelieferten überschrieben! Ihre alte Datei wird in " #_settingsname ".bak umbenannt."
            )
        )
        (set #Keep "Alte behalten")
        (set #Overwrite "Neue installieren")

    ; Main
        (set #AskMainPath        "Wo sollen die anderen Dateien installiert werden?")
        (set #AskMainPathUp    "Wo sind die anderen Zubehördateien installiert?")
        (set #AskMainPathHelp
            (cat
                "Wenn Sie sich nicht absolut sicher sind, wählen Sie \"" (tackon #MainDefaultPath #MainPath) "\"!"
            )
        )
        (set #AskMainPathUser "Einen anderen Ort wählen")

        (set #SelectMainDir        "Wo sollen die anderen Dateien installiert werden?\nEin neues Verzeichnis mit Namen Picasso96 wird dort installiert.")
        (set #SelectMainDirUp    "Wo sind die anderen Zubehördateien installiert worden?")
        (set #SelectMainDirHelp
            (cat
                "Dort werden ein paar Zubehördateien installiert, die für den alltäglichen Betrieb nicht gebraucht werden."
                "Eine dazugehörende Zuweisung wird später auch Ihrer User-Startup Datei hinzugefügt."
            )
        )

    ; Copy
        (set #Picasso96HomeDir "Picasso96 Stammverzeichnis wird angelegt.")
        (set #Picasso96HomeDirHelp "Das angelegte Verzeichnis beherbergt das Zubehör.")
        (set #Picasso96Dir "Das Verzeichnis für die Kartentreiber wird angelegt.")
        (set #Picasso96DirHelp "Dieses Verzeichnis wird die hardwarenahen Treiber sowie die rtg.library aufnehmen.")
        (set #CopyPicasso96 "Installation der Picasso96API.library Funktionsbibliothek.")
        (set #CopyPicasso96Help "Diese Bibliothek wird für Picasso96-Anwendungen benötigt.")
        (set #CopyRtg "Installation des RTG Systems.")
        (set #CopyRtgHelp "Diese Funktionsbibliothek enthält die Grafikfunktionserweiterungen.")
        (set #CopyFL "Installation der FastLayers Bibliothek.")
        (set #CopyFLHelp "Diese Funktionsbibliothek erhöht die Geschwindigkeit der Bewegung von Fenstern.")
        (set #CopyPDT
            (cat
                "Es wird ein neuer picture.datatype nach SYS:Classes/Datatypes installiert. "
                "Ihr alter picture.dataype wird als SYS:Classes/Datatypes/picture.datatype.old "
                "gesichert. Der neue picture.datatype wird unbedingt benötigt. "
            )
        )
        (set #CopyPDTHelp
            (cat
                "Der Original-AmigaOS-V40-picture.datatype funktioniert nicht mit "
                "Grafikkarten. Hier wird ein neuer picture.datatype installiert, "
                "der zum alten voll kompatibel ist aber zusätzlich mit "
                "Grafikkarten zusammenarbeitet. "
                "Ihr alter picture.dataype wird als SYS:Classes/Datatypes/picture.datatype.old "
                "gesichert. "
            )
        )
        (set #CopyCard "Installation des Hardwaretreibers für %s.")
        (set #CopyCardHelp "Dieser Treiber wird für mindestens eine der Karten dieses Typs benötigt.")
        (set #CopyMonitor "Installation der Monitordatei für %s.")
        (set #CopyMonitorHelp "Dieser Treiber wird für mindestens eine der Karten dieses Typs benötigt.")
        (set #MonitorToolType "Passe ToolTypes für %s an.")
        (set #MonitorToolTypeHelp "Dieser Schritt konfiguriert den Monitortreiber.")
        (set #CopyChip "Installation des Chipsatztreibers für %s.")
        (set #CopyChipHelp "Dieser Treiber wird für mindestens eine Ihrer Grafikkarten benötigt.")

        (set #CopyPicasso96Mode "Installiere Picasso96Mode.")
        (set #CopyPicasso96ModeHelp "Picasso96Mode wird zum Anpassen der Auflösungen an Ihr System benötigt.")
        (set #Picasso96ModeIconType "Anpassung der ToolTypes und Iconposition von Picasso96Mode.")
        (set #Picasso96ModeIconTypeHelp "Die ToolTypes von Picasso96Mode werden entsprechend Ihrer Wahl des Dateinamens der Datei mit den Auflösungen gesetzt.")

        (set #CopyEmuLib "Installation der Emulationsbibliothek.")
        (set #CopyEmuLibHelp
            (cat
                "Diese Bibliothek wird benötigt, um Programme zu unterstützen, "
                "die für andere Grafikkartensysteme geschrieben wurden."
            )
        )

        (set #CopyPicasso96API "Installiere Picasso96API.library")
        (set #CopyPicasso96APIHelp "Die Picasso96API.library wird für Programme mit direkter Picasso96 Unterstützung benötigt.")

        (set #CopyApps "Installation des Zubehörs.")
        (set #CopyAppsHelp "In diesem Schritt werden Zubehörprogramme installiert.")

    ; User-Startup
        (set #AddUserStartup "Änderungen an User-Startup durchführen.")
        (set #AddUserStartupHelp
            (cat
                "Eine Zuweisung \""
                #MainPath
                ":\" wir Ihrer SYS:s/User-Startup Datei hinzugefügt. "
                "Diese wird hauptsächlich zum Aktualisieren benötigt."
            )
        )

    ; Install
        (set #Msg-Installing "Installiere Picasso96 System!")

    ; Update
        (set #Msg-Updating "Aktualisierung Ihres Picasso96 Systems!")

    ; Delete
        (set #Msg-Deleting "Entferne Ihre Picasso96 Installation!")

    ; Install Drivers
        (set #CopyDrivers "\nMöchten Sie die Applikationstreiber auf die Festplatte kopieren, um sie bei Bedarf von dort installieren zu können?")
        (set #CopyDriversHelp "Die Treiber werden in das Picasso96 Verzeichnis auf Ihrer Festplatte kopiert. Von dort können Sie diese Treiber dann individuell nach Bedarf installieren.")
        (set #MsgInstallFromHD "\nBitte installieren sie die Treiber für die Anwendungen aus dem Picasso96 Verzeichnis oder von der Diskette.")

    ; Install Patches
        (set #InstPrtPatch "\nMöchten Sie das der P96_PrinterPatch automatisch beim Hochfahren gestartet wird ?")
        (set #InstPrtPatchHelp "Diese Prozedur kopiert ein Projekticon nach SYS:WBStartup, um den Printer Patch automatisch beim hochfahren des Computers zu starten.\nDieser Patch behebt einige Fehler die bei Ausdrücken auf 24bit Screenmodes passieren.")
    )
)

;=============================================================================
; French strings
;=============================================================================

(if
    (= @language "français")
    (
    ; startup message
        (set #StartupMsg1
            (cat
                "Picasso96 est un logiciel complexe qui nécessite une certaine expérience pour l'installer et le configurer. "
                "Si vous êtes un débutant sur Amiga et que vous avez déjà un système qui fonctionne pour votre carte graphique, "
                "vous devriez y réfléchir à deux fois avant d'installer Picasso96! "
                "Cette version de Picasso96 est une photographie du développement et est sensé fonctionner sur la plupart des systèmes. Cependant, le"
                "votre peut présenter des spécificités qui ne permette pas à Picasso96 de fonctionner. "
                "Donc, avant tout, faites un backup de votre configuration système avant d'installer Picasso96! "
            )
        )
        (set #StartupMsg2
            (cat
                "Avant de commencer, désactivez le ou les pilotes éventuellement installés pour votre carte craphique. "
                "Si vous ne le faites pas, votre système refusera probablement de fonctionne correctement après l'installation. "
                "A cause de la complexité et de la diversité des configurations qu'autorise le système Amiga, nous ne pouvons pas "
                "faire cette opération automatiquement. Si vous n'êtes pas sûr de la marche à suivre, consultez le manuel de votre "
                "logiciel pilote, ou lisez la section appropriée du manuel de Picasso96. "
            )
        )
        (set #StartupMsg3
            (cat
                "Lisez attentivement le manuel de Picasso96 avant de l'installer. La mise en place et la configuration de pilotes "
                "pour carte graphique ne sont pas simples et doivent être réalisées en toute connaissance de cause. Voulez-vous lire "
                "le manuel maintenant ? "
            )
        )
        (set #StartupHelp3
            (cat
                "Prenez le temps de lire la documentation ! Cette lecture pourra vous épargner des désagréments et/ou problèmes. "
            )
        )

    ; Errors
        (set #Err-Bad-Kick "Le Kickstart 3.0 ou supérieur est nécessaire pour installer Picasso96!")
        (set #Err-Bad-CPU "Vous devez posséder au moins un processeur MC68020 pour exécuter Picasso96!")
        (set #Err-No-Boards "Vous devez choisir au moins une carte graphique !")
        (set #Err-No-UpdateScript "Impossible de trouver le script de mise à jour de l'installation précédente, faites un backup de votre configuration et réinstallez!")
        (set #Err-No-DeleteScript "Impossible de trouver le script de mise à jour de l'installation précédente, supprimez la/les ancienne(s) version(s) manuellement.")

    ; Warnings
        (set #Warning-NoBoards
            (cat
                "Apparament, votre Amiga ne semble pas équipé d'une carte graphique compatible !\n\n"
                "Les cartes graphiques compatibles sont :\n\n"
                "CyberVision64 - Cybervision64/3D - Domino\nGraffity - Merlin - oMniBus\nPicassoII - PicassoII+ - PicassoIV\nPiccolo - Piccolo SD64 - RetinaBLTZ3\nSpectrum - uaegfx"
            )
        )

    ; Message
        (set #Message
            (cat
                "Merci beaucoup d'avoir choisi\n\n>>Picasso 96 <<\n\npour votre système graphique RTG.\n\n"
                "Picasso96 est un nouvel environnement, respectant le système Amiga, pour un grand nombre de cartes graphiques\ncréé par Tobias Abt & Alexander Kneer.\n\n\n\n"
                "Script d'installation ©1997 par Tobias Abt & Jens Langner\n\n"
            )
        )

    ; Install/Update
        (set #InstallMode "Désirez-vous installer, mettre à jour ou désinstaller Picasso96?")
        (set #InstallModeHelp
            (cat
                "L'option Installer va installer Picasso96 avec tous sys fichiers de configuration, "
                "avec l'option Mise à jour, vos fichiers de configuration ne seront pas modifiés ni effacés."
            )
        )
        (set #Install "pPremière installation")
        (set #Update "Mettre à jour votre installation")
        (set #UpdateSel "Que voulez-vous mettre à jour ?")
        (set #UpdateSelHelp
            (cat
                "Vous pouvez sélectionner quels sont les composants que vous voulez mettre à jour."
            )
        )
        (set #UpUnGfx    "pPilotes de cartes graphiques")
        (set #UpUnLib    "Bibliothèques partagées")
        (set #UpUnPdt    "Picture datatype 24Bit")
        (set #UpUnPMd    "Picasso96Mode")
        (set #UpUnAppl    "Applications et Documentation")
        (set #UpUnDriv    "Pilotes spéciaux")
        (set #UpUnMoni    "Réglages moniteur")
        (set #UpUstart    "Modifier la User-Startup")

        (set #Uninstall        "Désinstaller Picasso96")
        (set #UninstallSel    "Que voulez-vous désinstaller ?")
        (set #UninstallSelHelp
            (cat
                "Vous pouvez sélectionner quels sont les composants que vous voulez supprimer."
            )
        )
        (set #AskUninstall    "Voulez-vous vraiment supprimer les options sélectionnées ?")
        (set #AskUnyes            "Oui!")
        (set #AskUnno            "Non!")
        (set #AskUninstallHelp
            (cat
                "Si l'installer trouve des backups de veilles installations avant Picasso96,"
                "il les réinstallera."
            )
        )

        (set #InstEnd
            (cat
                "\nL'installation est terminée. L'installer a normalement copié tous les composants à leur place.\n\n"
                "Si vous avez, malgré tout, des problèmes, consultez les pages web suivantes pour obtenir de l'aide :\n\n"
                "http://picasso96.home.pages.de/\n"
                "http://www.villagetronic.com/amiga/\n\nMerci encore d'avoir choisi Picasso96!\n\nL'équipe de Picasso96...."
            )
        )
        (set #UpdEnd
            (cat
                "\nLa procédure de mise à jour est terminée. Le système doit normalement continuer à fonctionner normalement.\n\n"
                "Si vous avez, malgré tout, des problèmes, consultez les pages web suivantes pour obtenir de l'aide :\n\n"
                "http://picasso96.home.pages.de/\n"
                "http://www.villagetronic.com/amiga/\n\nMerci encore d'avoir choisi Picasso96!\n\nL'équipe de Picasso96...."
            )
        )
        (set #UniEnd
            (cat
                "\nLa procédure de désinstallation est terminée et les composants sélectionnés doivent être supprimés.\n\n"
                "Si vous avez, malgré tout, des problèmes, consultez les pages web suivantes pour obtenir de l'aide :\n\nhttp://picasso96.home.pages.de/\n"
                "http://www.villagetronic.com/amiga/\n\nMerci encore d'avoir essayé Picasso96! Et nous espérons que vous le réinstallerez bientôt.\n\n"
                "L'équipe de Picasso96...."
            )
        )

    ; Boards
        (set #AskBoards    "Quel(s) type(s) de carte(s) graphique(s) désirez-vous utiliser avec Picasso96?")
        (set #AskBoardsUp    "Pour quel(s) type(s) de carte(s) graphique(s) désirez-vous faire une mise à jour?")
        (set #AskBoardsUn    "Pour quel(s) type(s) de carte(s) graphique(s) désirez-vous supprimer le pilote?")
        (set #AskBoardsHelp
            (cat
                "Selectionnez les cartes que vous possédez ; si elles n'apparaissent pas dans la liste, "
                "dans ce cas, vous ne pouvez pas utiliser Picasso96. Demandez alors à l'équipe de Picasso96 ou "
                "au fabriquant de votre carte de développer le pilote adéquat."
            )
        )

    ; Monitor
        (set #15kHzMonitor "p15 kHz")
        (set #31kHzMonitor "31 kHz")
        (set #35kHzMonitor "35 kHz")
        (set #38kHzMonitor "38 kHz")
        (set #48kHzMonitor "48 kHz")
        (set #57kHzMonitor "57 kHz")
        (set #64kHzMonitor "64 kHz")
        (set #AskMonitor "Quelle fréquence de rafraîchissement horizontal maximum supporte votre moniteur?")
        (set #AskMonitorHelp
            (cat
                "Consultez le manuel de votre moniteur et vérifiez les fréquences de rafraîchissement"
                "horizontal qu'il peut supporter. Elles sont en général précisées comme 30-38 kHz. "
                "Choisissez la fréquence a plus adaptée."
            )
        )

    ; Libs
        (set #AskLibPath    "Où voulez-vous installer les bibliothèques de Picasso96?")
        (set #AskLibPathUp  "Où se trouvent les bibliothèques de Picasso96?")
        (set #AskLibPathHelp
            (cat
                "Si vous n'est pas sur de l'emplacement, choisissez \""
                #LibsDefaultPath "\"!"
            )
        )
        (set #AskLibPathUser "Choisissez un autre emplacement")

        (set #SelectLibDir "Choisissez un répertoire pour les bibiothèques de Picasso96.")
        (set #SelectLibDirUp "Choisissez le répertoire où sont installés les bibliothèques.")
        (set #SelectLibDirHelp
            (cat
                "Ce répertoire DOIT faire partie de vos assign LIBS:!"
                "De plus, il doit en faire partie avant que les moniteurs ne soient lancés."
                "De ce fait, il est naturel de les installer dans SYS:Libs."
            )
        )

    ; Monitor
        (set #AskMonitorPath    "Où voulez-vous installer les moniteurs de Picasso96?")
        (set #AskMonitorPathUp  "Où se trouvent les moniteurs de Picasso96?")
        (set #AskMonitorPathHelp
            (cat
                "Si vous n'est pas sur de l'emplacement, choisissez \""
                #MonitorsDefaultPath "\"!"
            )
        )
        (set #AskMonitorPathMonitors #MonitorsDefaultPath)
        (set #AskMonitorPathUser "Choisissez un autre emplacement")

        (set #SelectMonitorDir        "Choisissez un répertoire pour les moniteurs de Picasso96.")
        (set #SelectMonitorDirUp    "Choisissez le répertoire où sont installés les moniteurs.")
        (set #SelectMonitorDirHelp
            (cat
                "Si vous voulez démarrer Picasso96 pendant la phase de boot, "
                "le meilleur endroit est certainement \"" #MonitorsDefaultPath "\"."
            )
        )

    ; Prefs
        (set #AskPrefsPath    "Où désirez vous installer le programme de préférence \"Picasso96Mode\" ?")
        (set #AskPrefsPathUp    "Où se trouve le programme de préférence \"Picasso96Mode\" ?")
        (set #AskPrefsPathHelp
            (cat
                "Si vous n'est pas sur de l'emplacement, choisissez \""
                #PrefsDefaultPath "\"!"
            )
        )
        (set #AskPrefsPathPrefs #PrefsDefaultPath)
        (set #AskPrefsPathUser "Choisissez un autre emplacement")

        (set #SelectPrefsDir    "Choisissez un répertoire pour Picasso96Mode.")
        (set #SelectPrefsDirUp  "Choisissez le répertoire où se trouve Picasso96Mode.")
        (set #SelectPrefsDirHelp
            (cat
                "L'endroit le plus approprié pour Picasso96Mode est \"" #PrefsDefaultPath "\"."
            )
        )

    ; Settings
        (set #AskSettingsPath    "Où désirez-vous installer les fichiers de préférences de Picasso96?")
        (set #AskSettingsPathUp    "Où se trouvent vos fichiers de préférences Picasso96?")
        (set #AskSettingsPathHelp
            (cat
                "Si vous n'est pas sur de l'emplacement, choisissez \""
                #SettingsDefaultName "\"!"
            )
        )
        (set #AskSettingsPathDevs #SettingsDefaultName)
        (set #AskSettingsPathUser "Choisissez un autre emplacement")

        (set #SelectSettingsDir        "Choisissez un répertoire pour le fichier de préférences de Picasso96.")
        (set #SelectSettingsDirUp    "Choisissez le répertoire où se trouve le fichier de préférences de Picasso96.")
        (set #SelectSettingsDirHelp
            (cat
                "L'endroit le plus approprié pour le fichier de préférences est \"" #SettingsDefaultName "\"."
            )
        )
        (set #AskSettingsCopy "Il y a déjà un fichier de préférences à cet endroit!\nVoulez-vous le conserver?")
        (set #AskSettingsCopyHelp
            (cat
                "Attention! Si vous sélectionnez d'écraser le fichier, tous les réglages actuels seront remplacés par ceux par défaut "
                "Vos anciens réglages seront déplacés vers " #_settingsname ".bak"
            )
        )
        (set #Keep "Garder les anciens")
        (set #Overwrite "Installer les nouveaux")

    ; Main
        (set #AskMainPath        "Où désirez-vous installer les fichiers du support?")
        (set #AskMainPathUp    "Où se trouvent les fichiers du support?")
        (set #AskMainPathHelp
            (cat
                "Si vous n'est pas sur de l'emplacement, choisissez \"SYS:"
                #MainPath "\"!"
            )
        )
        (set #AskMainPathUser "Choisissez un autre emplacement")

        (set #SelectMainDir        "Où désirez-vous installer les fichiers du support?\nUn répertoire appelé Picasso96 sera créé à cet endroit.")
        (set #SelectMainDirUp    "Où se trouvent les fichiers du support?")
        (set #SelectMainDirHelp
            (cat
                "Un nouveau répertoire appelé Picasso96 va être créé pour les accueillir."
                "L'assign approprié sera ajouté à votre User-Startup."
            )
        )

    ; Copy
        (set #Picasso96HomeDir "Création d'un répertoire pour les applications et les scripts.")
        (set #Picasso96HomeDirHelp "Le répertoire créé contient maintenant les applications les scripts de mise à jour et désinstallation.")
        (set #Picasso96Dir "Création du répertoire pour les cartes et processeurs graphiques.")
        (set #Picasso96DirHelp "Le répertoire créé contient maintenant les bibliothèques des cartes et des processeurs graphique, ainsi que la rtg.library.")
        (set #CopyPicasso96 "Installation de la Picasso96API.library.")
        (set #CopyPicasso96Help "Cette bibliothèque est nécessaire pour les applications Picasso96.")
        (set #CopyRtg "Installation de la bibliothèque du système RTG.")
        (set #CopyRtgHelp "Cette bibliothèques fournit les fonctions du système graphique.")
        (set #CopyFL "Installation de la bibliothèque fastlayer.library.")
        (set #CopyFLHelp "Cette bibliothèque accélère le déplacement des fenêtres.")
        (set #CopyPDT
            (cat
                    "Installation du nouveau picture.datatype dans SYS:Classes/Datatypes. "
                    "Votre ancien sera sauvé en SYS:Classes/Datatypes/picture.datatype.old "
                    "Le nouveau picture.datatype est absolument nécessaire."
            )
        )
        (set #CopyPDTHelp
            (cat
                "Le picture.datatype du système AmigaOS V40 ne fonctionne pas correctement avec "
                "les cartes graphiques. Cette action en installera un nouveau qui possède toutes les "
                "toutes les fonctions de l'ancien, mais permet aussi l'utilisation de cartes graphiques. "
                "Votre ancien picture.datatype sera sauvé sous le fichier "
                "SYS:Classes/Datatypes/picture.datatype.old. "
            )
        )
        (set #CopyCard "Installation du pilote de la carte %s.")
        (set #CopyCardHelp "Ce pilote est nécessaire pour au moins une de vos cartes.")
        (set #CopyMonitor "Installation du moniteur pour %s.")
        (set #CopyMonitorHelp "Ce moniteur est nécessaire pour au moins une de vos cartes.")
        (set #MonitorToolType "Ajustement des tooltypes pour le moniteur %s's.")
        (set #MonitorToolTypeHelp "Cette étape configure le moniteur.")
        (set #CopyChip "Installation du pilote pour le processeur graphique %s.")
        (set #CopyChipHelp "Ce pilote est nécessaire pour au moins une de vos cartes.")

        (set #CopyPicasso96Mode "Installation de Picasso96Mode.")
        (set #CopyPicasso96ModeHelp "Vous avez besoin de Picasso96Mode pour ajuster vos paramêtres d'affichage.")
        (set #Picasso96ModeIconType "Ajustement des tooltypes de Picasso96Mode et de la position de son îcone.")
        (set #Picasso96ModeIconTypeHelp "Les tooltypes de Picasso96Mode reflete votre choix de l'emplacement des fichiers préférences.")

        (set #CopyEmuLib "Installation de la bibliothèque inter-plateforme emulation library.")
        (set #CopyEmuLibHelp
            (cat
                "Vous aves besoin de cette bibliothèque pour utiliser des programmes "
                "écrits pour d'autres système graphiques."
            )
        )

        (set #CopyPicasso96API "Installation de la Picasso96API.library")
        (set #CopyPicasso96APIHelp "La bibliothèque Picasso96API.library est nécessaire pour les applications utilisant directement Picasso96.")

        (set #CopyApps "Installation de programmes suplémentaires.")
        (set #CopyAppsHelp "Pendant cette étape, quelques programmes utilitaires seront installés.")

    ; User-Startup
        (set #AddUserStartup "Mise à jour de la User-Startup.")
        (set #AddUserStartupHelp
            (cat
                "An assignment \""
                #MainPath
                ":\" sera ajouté à votre fichier SYS:s/User-Startup. "
                "Ceci est nécessaire lorsque vous mettez à jour Picasso96."
            )
        )

    ; Install
        (set #Msg-Installing "Installation des fichier Picasso96!")

    ; Update
        (set #Msg-Updating "Mise à jour de votre installation courante!")

    ; Delete
        (set #Msg-Deleting "Suppression de votre installation courante!")

    ; Install Drivers
        (set #CopyDrivers "\nVoulez-vous installer les pilotes spécifiques pour certaines applications?")
        (set #CopyDriversHelp "Ces pilotes seront installés dans le répertoire Picasso96 pour vous permettre de les installer facilement par la suite.")
        (set #MsgInstallFromHD "\nInstallez les pilotes d'applications à partir de du répertoire de base de Picasso96 ou directement à partir de la disquette d'installation.")

    ; Install Patches
        (set #InstPrtPatch "\nDo you want to have the P96_PrinterPatch to be automatically started on Boot-Up ?")
        (set #InstPrtPatchHelp "This procedure will copy a project icon to your SYS:WBstartup to start the printer patch automatically.\nThis patch wil solve problems with printing on 24bit screens.")
    )
)

;=============================================================================
; Italian strings
;=============================================================================

(if
    (= @language "italiano")
    (
    ; startup message
        (set #StartupMsg1
            (cat
                "Picasso96 è un sistema software complesso e richiede un po' di esperienza per l'installazione e la configurazione. "
                "Se sei un po' inesperto di Amiga ed hai già un ambiente funzionante per la tua scheda grafica, "
                "è meglio che ci pensi due volte prima di installare Picasso96! "
                "Questa versione di Picasso96 è una `istantanea' dello sviluppo in corso e funziona sulla maggior parte dei sistemi. Comunque, "
                "il tuo sistema può essere diverso in qualche particolare e questa versione di Picasso96 potrebbe non funzionare sul tuo Amiga. "
                "Perciò, effettua una copia di sicurezza della tua configurazione di sistema corrente prima di installare Picasso96! "
            )
        )
        (set #StartupMsg2
            (cat
                "Prima di proseguire, disabilita i driver correnti per la tua scheda grafica, se presenti, e rilancia Amiga. "
                "In caso contrario il tuo sistema probabilmente non funzionerà correttamente in seguito. "
                "A causa della complessità dei diversi sistemi disponibili, non è possibile effettuare questa operazione "
                "in modo automatico, per cui devi farla manualmente. Fai riferimento ai manuali del tuo driver corrente "
                "o leggi l'apposita sezione del manuale di Picasso96. "
            )
        )
        (set #StartupMsg3
            (cat
                "Leggi la documentazione prima di installare Picasso96. L'avvio e la configurazione di driver grafici "
                "non è semplice e dovresti farla tenendo ben presenti alcune cose. Vuoi leggere adesso il manuale? "
            )
        )
        (set #StartupHelp3
            (cat
                "Leggi la documentazione! Ti potrebbe aiutare nell'evitare alcuni problemi!"
            )
        )

    ; Errors
        (set #Err-Bad-Kick "Per usare Picasso96 hai bisogno almeno del KickStart 3.0!")
        (set #Err-Bad-CPU "Per usare Picasso96 hai bisogno almeno di CPU Motorola M68020!")
        (set #Err-No-Boards "Dovresti aver scelto almeno un tipo di scheda grafica!")
        (set #Err-No-UpdateScript "Non riesco a trovare lo script di aggiornamento di una precedente installazione, fai la copia di sicurezza dei file di configurazione e riesegui l'installazione!")
        (set #Err-No-DeleteScript "Non riesco a trovare lo script di aggiornamento di una precedente installazione, effettua la rimozione manualmente.")

    ; Warnings
        (set #Warning-NoBoards
            (cat
                "Sembra che il tuo Amiga non abbia schede grafiche compatibili installate!\n\n"
                "Schede grafiche compatibili:\n\n"
                "CyberVision64 - Cybervision64/3D - Domino\nGraffity - Merlin - oMniBus\nPicassoII - PicassoII+ - PicassoIV\nPiccolo - Piccolo SD64 - RetinaBLTZ3\nSpectrum - UAEgfx"
            )
        )

    ; Message
        (set #Message
            (cat
                "Grazie mille per aver scelto\n\n>> Picasso96 <<\n\ncome tuo sistema grafico.\n\n"
                "Picasso96 è il nuovo ambiente di gestione per molte schede grafiche di Amiga compatibile col sistema\ndi Tobias Abt & Alexander Kneer.\n\n\n\n"
                "Installscript ©`97 by Tobias Abt & Jens Langner\n\n"
            )
        )

    ; Install/Update
        (set #InstallMode "Vuoi effettuare l'installazione, l'aggiornamento o la disinstallazione di Picasso96?")
        (set #InstallModeHelp
            (cat
                "Scegliendo Installa, installerai Picasso96 con tutti i file di configurazione,"
                "se fai click su Aggiorna, i tuoi file di configurazione esistenti non saranno toccati."
            )
        )
        (set #Install "Prima installazione")
        (set #Update "Aggiorna una versione installata")
        (set #UpdateSel "Cosa desideri aggiornare ?")
        (set #UpdateSelHelp
            (cat
                "Qui puoi selezionare cosa desideri aggiornare nella versione installata di Picasso96."
            )
        )
        (set #UpUnGfx   "Driver per schede grafiche")
        (set #UpUnLib   "File library")
        (set #UpUnPdt   "24bit picture.datatype")
        (set #UpUnPMd   "Picasso96Mode")
        (set #UpUnAppl  "Applicazioni e documentazione")
        (set #UpUnDriv  "Driver speciali")
        (set #UpUnMoni  "Impostazioni per monitor")
        (set #UpUstart  "Modifica User-Startup")

        (set #Uninstall     "Disinstalla")
        (set #UninstallSel  "Cosa desideri disinstallare ?")
        (set #UninstallSelHelp
            (cat
                "Qui puoi selezionare cosa desideri rimuovere dalla versione installata di Picasso96."
            )
        )
        (set #AskUninstall  "Vuoi veramente disinstallare quanto selezionato ?")
        (set #AskUnyes      "Sì!")
        (set #AskUnno       "No!")
        (set #AskUninstallHelp
            (cat
                "Se Installer troverà qualsiasi copia di sicurezza di una vecchia installazione prima di Picasso96,"
                "la reinstallerà."
            )
        )

        (set #InstEnd
            (cat "\nL'installazione è ora terminata e Installer dovrebbe aver copiato tutto quanto nella corretta posizione.\n\n"
                 "Se incontri ancora problemi, fai riferimento alle seguenti pagine Web per avere aiuto:\n\nhttp://picasso96.home.pages.de/\n"
                 "http://www.villagetronic.com/amiga/\n\nGrazie mille per aver scelto Picasso96\n\nIl team di Picasso96...."
            )
        )
        (set #UpdEnd
            (cat "\nL'aggiornamento è ora terminato e tutto dovrebbe funzionare ancora correttamente.\n\n"
                 "Se incontri problemi, fai riferimento alle seguenti pagine Web per avere aiuto:\n\nhttp://picasso96.home.pages.de/\n"
                 "http://www.villagetronic.com/amiga/\n\nGrazie mille per aver aggiornato Picasso96\n\nIl team di Picasso96...."
            )
        )
        (set #UniEnd
            (cat "\nLa procedura di disinstallazione è ora terminata e tutti i componenti selezionati dovrebbero essere stati correttamente rimossi.\n\n"
                 "Se incontri problemi, fai riferimento alle seguenti pagine Web per avere aiuto:\n\nhttp://picasso96.home.pages.de/\n"
                 "http://www.villagetronic.com/amiga/\n\nGrazie mille per aver provato Picasso96. Noi speriamo che lo installerai di nuovo presto\n\n"
                 "Il team di Picasso96...."
            )
        )

    ; Boards
        (set #AskBoards "Che tipo di scheda(e) grafica(e) vuoi usare con Picasso96?")
        (set #AskBoardsUp   "Quali driver di schede grafiche desideri aggiornare?")
        (set #AskBoardsUn   "Quali driver di schede grafiche desideri disinstallare?")
        (set #AskBoardsHelp
            (cat
                "Scegli la(e) scheda(e) che possiedi, se non ne possiedi una, non puoi "
                "usare Picasso96. Chiedi agli sviluppatori o al costruttore della tua "
                "scheda di realizzare un apposito driver."
            )
        )

    ; Monitor
        (set #15kHzMonitor "p15 kHz")
        (set #31kHzMonitor "31 kHz")
        (set #35kHzMonitor "35 kHz")
        (set #38kHzMonitor "38 kHz")
        (set #48kHzMonitor "48 kHz")
        (set #57kHzMonitor "57 kHz")
        (set #64kHzMonitor "64 kHz")
        (set #AskMonitor "Quale frequenza di scansione orizzontale può gestire il tuo monitor?")
        (set #AskMonitorHelp
            (cat
                "Guarda nei manuali del tuo monitor e cerca la frequenza di scansione "
                "orizzontale che può gestire. In genere sono specificate come 30-38 kHz. "
                "Scegli l'opzione che meglio si adatta."
            )
        )

    ; Libs
        (set #AskLibPath    "Dove vuoi installare i file library di Picasso96?")
        (set #AskLibPathUp  "Dove sono installati i file library di Picasso96?")
        (set #AskLibPathHelp
            (cat
                "Se non sei sicuro di cosa rispondere, scegli \""
                #LibsDefaultPath "\"!"
            )
        )
        (set #AskLibPathLibs #LibsDefaultPath)
        (set #AskLibPathUser "Scegli un'altra destinazione")

        (set #SelectLibDir "Scegli una directory per i file library di Picasso96.")
        (set #SelectLibDirUp "Scegli la directory dove hai installato i file.")
        (set #SelectLibDirHelp
            (cat
                "Questa directory DEVE essere parte delle tue assegnazioni per LIBS:!"
                "Deve essere parte di libs: prima che siano attivati i file per monitor."
                "Di solito è meglio installare tali file in SYS:libs."
            )
        )

    ; Monitor
        (set #AskMonitorPath "Dove vuoi installare i file per monitor di Picasso96?")
        (set #AskMonitorPathUp  "Dove sono installati i file per monitor di Picasso96?")
        (set #AskMonitorPathHelp
            (cat
                "Se non sei sicuro di cosa rispondere, scegli \""
                #MonitorsDefaultPath "\"!"
            )
        )
        (set #AskMonitorPathMonitors #MonitorsDefaultPath)
        (set #AskMonitorPathUser "Scegli un'altra destinazione")

        (set #SelectMonitorDir      "Scegli una directory per i file per monitor di Picasso96.")
        (set #SelectMonitorDirUp    "Scegli la directory dove sono presenti i file per monitor di Picasso96.")
        (set #SelectMonitorDirHelp
            (cat
                "Se desideri che Picasso96 sia avviato automaticamente durante la"
                "fase di lancio del sistema, la miglior soluzione sarebbe mettere i file per monitor"
                "in \"" #MonitorsDefaultPath "\"."
            )
        )

    ; Prefs
        (set #AskPrefsPath      "Dove vuoi installare il programma \"Picasso96Mode\" per l'impostazione di Picasso96?")
        (set #AskPrefsPathUp    "Dove è installato il programma \"Picasso96Mode\" per l'impostazione di Picasso96?")
        (set #AskPrefsPathHelp
            (cat
                "Se non sei sicuro di cosa rispondere, scegli \""
                #PrefsDefaultPath "\"!"
            )
        )
        (set #AskPrefsPathPrefs #PrefsDefaultPath)
        (set #AskPrefsPathUser "Scegli un'altra destinazione")

        (set #SelectPrefsDir    "Scegli una directory per Picasso96Mode.")
        (set #SelectPrefsDirUp  "Scegli la directory dove hai installato Picasso96Mode.")
        (set #SelectPrefsDirHelp
            (cat
                "Solitamente è una buona soluzione mettere Picasso96Mode in \"" #PrefsDefaultPath "\"."
            )
        )

    ; Settings
        (set #AskSettingsPath   "Dove vuoi installare i file di impostazione per Picasso96?")
        (set #AskSettingsPathUp "Dove hai installato i file di impostazione per Picasso96?")
        (set #AskSettingsPathHelp
            (cat
                "Se non sei sicuro di cosa rispondere, scegli \""
                #SettingsDefaultName "\"!"
            )
        )
        (set #AskSettingsPathDevs #SettingsDefaultName)
        (set #AskSettingsPathUser "Scegli un'altra destinazione")

        (set #SelectSettingsDir     "Scegli una directory per i file di impostazione per Picasso96.")
        (set #SelectSettingsDirUp   "Scegli la directory dove sono presenti i file di impostazione per Picasso96.")
        (set #SelectSettingsDirHelp
            (cat
                "Solitamente è una buona soluzione immagazzinare le impostazioni come \"" #SettingsDefaultName "\"."
            )
        )
        (set #AskSettingsCopy "Un file di impostazione è già presente!\nVuoi mantenere quello vecchio?")
        (set #AskSettingsCopyHelp
            (cat
                "Attenzione! Se scegli la sovrascrittura, tutte le impostazioni correnti saranno sostituite da quelle predefinite. "
                "Il tuo vecchio file sarà rinominato in " #_settingsname ".bak"
            )
        )
        (set #Keep "Tieni il vecchio")
        (set #Overwrite "Installa il nuovo")

    ; Main
        (set #AskMainPath   "Dove vuoi installare i file di supporto?")
        (set #AskMainPathUp "Dove sono installati i file di supporto?")
        (set #AskMainPathHelp
            (cat
                "Se non sei sicuro di cosa rispondere, scegli \"SYS:"
                #MainPath "\"!"
            )
        )
        (set #AskMainPathDevs (cat "SYS:" #MainPath))
        (set #AskMainPathUser "Scegli un'altra destinazione")

        (set #SelectMainDir     "Dove vuoi installare i file di supporto?\nSarà creato un cassetto di nome Picasso96.")
        (set #SelectMainDirUp   "Dove sono installati i file di supporto?")
        (set #SelectMainDirHelp
            (cat
                "Un nuovo cassetto chiamato Picasso96 sarà creato per contenere i file."
                "In seguito sarà aggiunta una opportuna assegnazione nel tuo file user-startup."
            )
        )

    ; Copy
        (set #Picasso96HomeDir "Sto creando il cassetto per applicativi e script.")
        (set #Picasso96HomeDirHelp "Il cassetto ora creato contiene applicativi e script per l'aggiornamento e la disinstallazione.")
        (set #Picasso96Dir "Sto creando il cassetto per schede grafiche e chip.")
        (set #Picasso96DirHelp "Il cassetto ora creato contiene i driver per chip e schede grafiche, nonché la rtg.library principale.")
        (set #CopyPicasso96 "Sto installando la Picasso96API.library.")
        (set #CopyPicasso96Help "Questa library serve per gli applicativi Picasso96.")
        (set #CopyRtg "Sto installando la RTG library di sistema.")
        (set #CopyRtgHelp "Questa library fornisce le funzioni grafiche di sistema.")
        (set #CopyFL "Sto installando la fast layers library.")
        (set #CopyFLHelp "Questa library migliora le prestazioni nello spostamento di finestre.")
        (set #CopyPDT
            (cat "Sto installando un nuovo picture.datatype in SYS:Classes/Datatypes. "
                 "Il vecchio sarà salvato come SYS:Classes/Datatypes/picture.datatype.old "
                 "Il nuovo picture.datatype è assolutamente necessario."
            )
        )
        (set #CopyPDTHelp
            (cat "Il picture.datatype V40 originale di AmigaOS non funziona"
                 "con le schede grafiche. Per tale motivo è installato il nuovo "
                 "che ha tutte le funzionalità del vecchio, ma può anche "
                 "gestire schede grafiche. Il vecchio picture.datatype sarà salvato "
                 "come SYS:Classes/Datatypes/picture.datatype.old. "
            )
        )
        (set #CopyCard "Sto installando il driver per la scheda %s.")
        (set #CopyCardHelp "Questo driver è richiesto per almeno una delle tue schede grafiche.")
        (set #CopyMonitor "Sto installando il driver monitor per %s.")
        (set #CopyMonitorHelp "Questo driver è richiesto per almeno una delle tue schede.")
        (set #MonitorToolType "Sto regolando i parametri per il driver monitor di %s.")
        (set #MonitorToolTypeHelp "Questo passaggio serve per configurare il driver monitor.")
        (set #CopyChip "Sto installando il driver per il chipset %s.")
        (set #CopyChipHelp "Questo driver è richiesto per almeno una delle tue schede.")

        (set #CopyPicasso96Mode "Sto installando Picasso96Mode.")
        (set #CopyPicasso96ModeHelp "Picasso96Mode ti servirà per regolare le tue impostazioni video.")
        (set #Picasso96ModeIconType "Sto sistemando i parametri di Picasso96Mode e la posizione della sua icona.")
        (set #Picasso96ModeIconTypeHelp "I parametri di Picasso96Mode rifletteranno le tue scelte sulla locazione del file di impostazioni.")

        (set #CopyEmuLib "Sto installando la emulation.library.")
        (set #CopyEmuLibHelp
            (cat
                "Questa library ti servirà solo per usare applicativi "
                "scritti per altri sistemi di gestione per schede grafiche."
            )
        )

        (set #CopyPicasso96API "Sto installando la Picasso96API.library")
        (set #CopyPicasso96APIHelp "La Picasso96API.library è richiesta dagli applicativi che supportano direttamente Picasso96.")

        (set #CopyApps "Sto installando i programmi aggiuntivi.")
        (set #CopyAppsHelp "Durante questo passaggio saranno installati alcuni programmi di utilità.")

    ; User-Startup
        (set #AddUserStartup "Sto modificando il file User-Startup.")
        (set #AddUserStartupHelp
            (cat
                "Sarà aggiunta una assegnazione \""
                #MainPath
                ":\" al tuo file SYS:s/User-Startup. "
                "Ciò serve principalmente per gli aggiornamenti di Picasso96."
            )
        )

    ; Install
        (set #Msg-Installing "Sto installando i file Picasso96!")

    ; Update
        (set #Msg-Updating "Sto aggiornando una installazione già esistente!")

    ; Delete
        (set #Msg-Deleting "Sto eliminando una installazione già esistente!")

    ; Install Drivers
        (set #CopyDrivers "\nVuoi copiare i driver per applicativi sul tuo disco rigido?")
        (set #CopyDriversHelp "I driver saranno installati nella directory Picasso96 directory sul tuo disco rigido per permetterti una facile installazione a richiesta.")
        (set #MsgInstallFromHD "\nInstalla i driver per applicativi partendo dalla directory base di Picasso96 o dal disco dei driver.")

    ; Install Patches
        (set #InstPrtPatch "\nDo you want to have the P96_PrinterPatch to be automatically started on Boot-Up ?")
        (set #InstPrtPatchHelp "This procedure will copy a project icon to your SYS:WBstartup to start the printer patch automatically.\nThis patch wil solve problems with printing on 24bit screens.")
    )
)

;=============================================================================
; Swedish strings
;=============================================================================

(if
    (= @language "svenska")
    (
    ; startup message
        (set #StartupMsg1
            (cat
                "Picasso96 är en komplex mjukvara och kräver en del erfarenhet för att installera och konfigurera. "
                "Om du är en nybörjare och redan har en fungerande mjukvara för ditt grafikkort, "
                "bör du nog tänka efter en extra gång innan du installerar Picasso96! "
                "Denna version av Picasso96 är under utveckling och fungerar på de flesta system. Ditt system kan "
                "dock skilja sig i vissa aspekter, och denna version av Picasso96 kanske inte fungerar på din Amiga. "
                "Alltså, säkerhetskopiera din nuvarande systemkonfiguration innan du installerar Picasso96! "
            )
        )
        (set #StartupMsg2
            (cat
                "Innan du fortsätter, deaktivera dina nuvarande grafikkortsdrivrutiner och starta om. (om du har några) "
                "I annat fall kommer ditt system antagligen inte att fungera korrekt efteråt. "
                "På grund av komplexiteten hos olika tillgängliga system kan inte detta utföras automatiskt. "
            )
        )
        (set #StartupMsg3
            (cat
                "V.G. läs dokumentationen innan du installerar Picasso96. Installation och konfigurering av grafikdrivrutiner "
                "är inte trivial och måste göras med vissa saker i åtanke. Vill du läsa manualen nu? "
            )
        )
        (set #StartupHelp3
            (cat
                "Läs dokumentationen! Det kan hjälpa dig att undvika en del problem!"
            )
        )

    ; Errors
        (set #Err-Bad-Kick "Du måste ha minst KickStart 3.0 för att kunna köra Picasso96!")
        (set #Err-Bad-CPU "Du måste ha en Motorola M68020 CPU, eller bättre för att köra Picasso96!")
        (set #Err-No-Boards "Du borde åtminstone ha valt en korttyp!")
        (set #Err-No-UpdateScript "Kunde inte hitta uppdateringsskript från föregånde installation. Gör en backup på dina konfigureringsfiler och installera på nytt!")
        (set #Err-No-DeleteScript "Kunde inte hitta avinstalleringsskript från föregånde installation, du måste radera själv.")

    ; Warnings
        (set #Warning-NoBoards
            (cat
                "Det verkar som om din Amiga inte har något kompatibelt grafikkort installerat!\n"
                "Dessa grafikkort är kompatibla:\n\n"
                "CyberVision64 - Cybervision64/3D - Domino\nGraffity - Merlin - oMniBus\nPicassoII - PicassoII+ - PicassoIV\nPiccolo - Piccolo SD64 - RetinaBLTZ3\nSpectrum - uaegfx"
            )
        )

    ; Message
        (set #Message
            (cat
                "Tack för att du har valt\n\n>> Picasso96 <<\n\n som ditt grafiksystem.\n\n"
                "Picasso96 är de nya systemvänliga drivrutinerna för många olika Amiga grafikkort\nav Tobias Abt & Alexander Kneer.\n\n\n\n"
                        "Installscript ©1997 by Tobias Abt & Jens Langner\n\n"
            )
        )

    ; Install/Update
        (set #InstallMode "Vill du installera, uppdatera eller avinstallera Picasso96?")
        (set #InstallModeHelp
            (cat
                "Väljer du installera, installeras Picasso96 med alla konfigurationsfiler,"
                "om du klickar på uppdatera, kommer dina nuvarande konfiguration filer inte att ändras."
            )
        )
        (set #Install "pInstallera")
        (set #Update "Updatera")
        (set #UpdateSel "Vad vill du uppdatera ?")
        (set #UpdateSelHelp
            (cat
                "Här kan du välja vad du vill uppdatera i din Picasso96 installation."
            )
        )
        (set #UpUnGfx    "pGrafikkortdrivrutiner")
        (set #UpUnLib    "Libraries")
        (set #UpUnPdt    "24bit picture.datatype")
        (set #UpUnPMd    "Picasso96Mode")
        (set #UpUnAppl    "Applikationer & Dokumentation")
        (set #UpUnDriv    "Speciella drivrutiner")
        (set #UpUnMoni    "Skärminställningar")
        (set #UpUstart    "Ändra i User-Startup")

    (set #Uninstall "Avinstallera")
        (set #UninstallSel  "Vad vill du avinstallera ?")
        (set #UninstallSelHelp
            (cat
                "Här kan du välja vad du vill ta bort från din Picasso96 installation."
            )
        )

        (set #AskUninstall    "Vill du verkligen avinstallera de valda delarna?")
        (set #AskUnyes    "Ja!")
        (set #AskUnno    "Nej!")
        (set #AskUninstallHelp
            (cat
                "Om installeraren hittar några backuper från en gammal installation av Picasso96,"
                "kommer den att återinstallera dem."
            )
        )

        (set #InstEnd
            (cat
                "\nInstallationen är nu klar och förhoppningsvis har installeraren kopierat allt till rätt ställe.\n\n"
                "Om du ändå har några problem, besök följande websidor för hjälp:\n\nhttp://picasso96.home.pages.de/\n"
                "http://www.villagetronic.com/amiga/\n\nTack för att du valde Picasso96\n\nDitt Picasso96-team...."
            )
        )
        (set #UpdEnd
            (cat
                "\nUppdateringen är nu klar och förhoppningsvis fungerar allt fortfarande korrekt.\n\n"
                "Om du stöter på några problem, besök följande websidor för hjälp:\n\nhttp://picasso96.home.pages.de/\n"
                "http://www.villagetronic.com/amiga/\n\nTack för att du valde Picasso96\n\nDitt Picasso96-team...."
            )
        )
        (set #UniEnd
            (cat
                "\nAvinstalleringen är nu klar och förhoppningsvis är alla valda delar borttagna korrekt.\n\n"
                "Om du stöter på några problem, besök följande websidor för hjälp:\n\nhttp://picasso96.home.pages.de/\n"
                "http://www.villagetronic.com/amiga/\n\nTack för att du prövade Picasso96. Vi hoppas att du snart installerar det igen\n\n"
                "Ditt Picasso96-team...."
            )
        )

    ; Boards
        (set #AskBoards    "Vilken/vilka typer av grafikkkort vill du använda med Picasso96?")
        (set #AskBoardsUp    "För vilka grafikkort vill du uppdatera drivrutinerna?")
        (set #AskBoardsUn    "För vilka grafikkort vill du avinstallera drivrutinerna?")
        (set #AskBoardsHelp
            (cat
                "Välj de kort du har installerade i din Amiga, om du inte har något av dem "
                "kan du inte använda Picasso96 än. Säg till utvecklingsteamet eller tillverkaren av  "
                "av ditt grafikkort att göra en passande drivrutin."
            )
        )

    ; Monitor
        (set #15kHzMonitor "p15 kHz")
        (set #31kHzMonitor "31 kHz")
        (set #35kHzMonitor "35 kHz")
        (set #38kHzMonitor "38 kHz")
        (set #48kHzMonitor "48 kHz")
        (set #57kHzMonitor "57 kHz")
        (set #64kHzMonitor "64 kHz")
        (set #AskMonitor "Vilken högsta horisontell avlänkningsfrekvens klarar din monitor?")
        (set #AskMonitorHelp
            (cat
                "Se efter i manualen till din monitor och leta efter 'horizontal scan rate', eller "
                "avlänkningsfrekvens om den nu skulle vara skriven på svenska... "
                "Välj den närmaste frekvensen."
            )
        )

    ; Libs
        (set #AskLibPath "Var vill du ha library-filerna för Picasso96 installerade?")
        (set #AskLibPathUp  "Var har du installerat library-filerna för Picasso96?")
        (set #AskLibPathHelp
            (cat
                "Om du inte är helt säker på vad du ska välja, välj \""
                #LibsDefaultPath "\"!"
            )
        )
        (set #AskLibPathUser "Välj ett annat ställe")

        (set #SelectLibDir "Välj en katalog för Picasso96's library-filer.")
        (set #SelectLibDirUp "Välj den katalog där du har installerat filerna.")
        (set #SelectLibDirHelp
            (cat
                "Denna katalog MÅSTE vara en del av ditt LIBS: 'assign'!"
                "Den måste vara en del av libs: innan monitor-filerna körs."
                "Därför, är det vanligtvis bäst att installera dem i SYS:libs."
            )
        )

    ; Monitor
        (set #AskMonitorPath "Var vill du installera monitor-filerna?")
        (set #AskMonitorPathUp  "Var har du monitor-filerna installerade?")
        (set #AskMonitorPathHelp
            (cat
                "Om du inte är helt säker på vad du ska välja, välj \""
                #MonitorsDefaultPath "\"!"
            )
        )
        (set #AskMonitorPathMonitors #MonitorsDefaultPath)
        (set #AskMonitorPathUser "Välj ett annat ställe")

        (set #SelectMonitorDir "Välj en katalog för Picasso96's monitor-filer.")
        (set #SelectMonitorDirUp    "Välj den katalog som monitor-filen för Picasso96 finns.")
        (set #SelectMonitorDirHelp
            (cat
                "Om du vill att Picasso96 ska startas automatiskt under omstart "
                "är det nog bäst att installera monitor-filerna "
                "i \"" #MonitorsDefaultPath "\"."
            )
        )

    ; Prefs
        (set #AskPrefsPath "Var vill du installera Picasso96's inställningsprogram, \"Picasso96Mode\"?")
        (set #AskPrefsPathUp    "Var har du installerat Picasso96's inställningsprogram, \"Picasso96Mode\"?")
        (set #AskPrefsPathHelp
            (cat
                "Om du inte vet vad du ska välja, välj \""
                #PrefsDefaultPath "\"!"
            )
        )
        (set #AskPrefsPathPrefs #PrefsDefaultPath)
        (set #AskPrefsPathUser "Välj ett annat ställe")

        (set #SelectPrefsDir "Ange en katalog för Picasso96Mode.")
        (set #SelectPrefsDirUp  "Välj den katalog där du installerade Picasso96Mode.")
        (set #SelectPrefsDirHelp
            (cat
                "Det är vanligtvis bäst att lägga Picasso96Mode i \"" #PrefsDefaultPath "\"."
            )
        )

    ; Settings
        (set #AskSettingsPath "Var vill du ha Picasso96's inställningsfil installerad?")
        (set #AskSettingsPathUp "Var har du installerat Picasso96's inställningsfil?")
        (set #AskSettingsPathHelp
            (cat
                "Om du inte vet vad du ska välja, välj \""
                #SettingsDefaultName "\"!"
            )
        )
        (set #AskSettingsPathDevs #SettingsDefaultName)
        (set #AskSettingsPathUser "Välj ett annat ställe")

        (set #SelectSettingsDir        "Välj en katalog för Picasso96's inställningsfil.")
        (set #SelectSettingsDirUp    "Välj den katalog där Picasso96's inställningsfil finns.")
        (set #SelectSettingsDirHelp
            (cat
                "Det är bäst att ha filen lagrad som \"" #SettingsDefaultName "\"."
            )
        )
        (set #AskSettingsCopy "Det finns redan en inställningsfil!\nVill du ha kvar den gamla?")
        (set #AskSettingsCopyHelp
            (cat
                "Varning! Om du väljer 'Skriv över' kommer alla nuvarande inställningar att ersättas. "
                "Din gamla fil kommer att flyttas till " #_settingsname ".bak"
            )
        )
        (set #Keep "Behåll den gamla")
        (set #Overwrite "Skriv över")

    ; Main
        (set #AskMainPath        "Var vill du ha supportfilerna installerade?")
        (set #AskMainPathUp    "Var är supportfilerna installerade?")
        (set #AskMainPathHelp
            (cat
                "Om du inte är helt säker på vad du ska välja, välj \"" (tackon #MainDefaultPath #MainPath) "\"!"
            )
        )
        (set #AskMainPathUser "Välj ett annat ställe")

        (set #SelectMainDir        "Var vill du installera supportfilerna?\nEn låda med namner Picasso96 kommer att skapas där.")
        (set #SelectMainDirUp    "Var har du installerat supportfilerna?")
        (set #SelectMainDirHelp
            (cat
                "En låda med namnet Picasso96 kommer att skapas förfilerna."
                "En 'assign' kommer att läggas till din user-startup senare."
            )
        )

    ; Copy
        (set #Picasso96HomeDir "Skapar lådan för applikationer och skriptfiler.")
        (set #Picasso96HomeDirHelp "Den skapade lådan innehåller nu applikationer och uppdaterings- och avinstalleringsskriptet.")
        (set #Picasso96Dir "Skapar lådan för kort och chips.")
        (set #Picasso96DirHelp "Den skapade lådan innehåller nu chip- och kortdrivrutiner och rtg.library.")
        (set #CopyPicasso96 "Installerar Picasso96API.library.")
        (set #CopyPicasso96Help "Detta library krävs för Picasso96-applikationer.")
        (set #CopyRtg "Installerar RTG system library.")
        (set #CopyRtgHelp "Detta library innehåller grafiksystem-funktioner.")
        (set #CopyFL "Installerar fast layers library.")
        (set #CopyFLHelp "Detta library förbättrar fönsterhanteringen.")
        (set #CopyPDT
            (cat
                "Installerar en ny picture.datatype till SYS:Classes/Datatypes. "
                "Din gamla sparas som SYS:Classes/Datatypes/picture.datatype.old "
                "Den nya picture.datatype är absolut nödvändig."
            )
        )
        (set #CopyPDTHelp
            (cat
                "AmigaOS V40 picture.datatype fungerar inte med grafikkort "
                "Detta kommer att installera en ny som fungerar likadant men "
                "men också kan fungera med grafikkort. "
                "Din gamla picture.datatype sparas som "
                "SYS:Classes/Datatypes/picture.datatype.old. "
            )
        )
        (set #CopyCard "Installerar drivrutin för %s.")
        (set #CopyCardHelp "Denna drivrutin behövs för minst ett av dina kort.")
        (set #CopyMonitor "Installerar monitor-drirutin för %s.")
        (set #CopyMonitorHelp "Denna drivrutin behövs för minst ett av dina kort.")
        (set #MonitorToolType "Ställer in tooltypes för %s's monitor-drivrutinen.")
        (set #MonitorToolTypeHelp "Detta konfigurer monitor-drivrutinen.")
        (set #CopyChip "Installerar chipset-drivrutin för %s.")
        (set #CopyChipHelp "Denna drivrutin behövs för minst ett av dina kort.")

        (set #CopyPicasso96Mode "Installerar Picasso96Mode.")
        (set #CopyPicasso96ModeHelp "Du behöver Picasso96Mode för att ändra dina monitorinställningar.")
        (set #Picasso96ModeIconType "Ställer in verktygstyper för Picasso96Mode och positionerar dess ikon.")
        (set #Picasso96ModeIconTypeHelp "Verktygstyperna i Picasso96Mode kommer att innehålla den sökväg du valde till inställningsfilen.")

        (set #CopyEmuLib "Installerar cross platform emulation library.")
        (set #CopyEmuLibHelp
            (cat
                "Detta library behöver du för att kunna köra program skrivna för andra grafikkortsystem. "
            )
        )

        (set #CopyPicasso96API "Installerar Picasso96API.library")
        (set #CopyPicasso96APIHelp "Picasso96API.library krävs för program som är skrivna speciellt för Picasso96.")

        (set #CopyApps "Installerar extra program.")
        (set #CopyAppsHelp "Under detta steg installeras några verktyg.")

    ; User-Startup
        (set #AddUserStartup "Utför ändringar av User-Startup.")
        (set #AddUserStartupHelp
            (cat
                "En tilldelning ('assign') \""
                #MainPath
                ":\" kommer att läggas till i din SYS:s/User-Startup. "
                "Denna krävs främst för uppdateringar av Picasso96."
            )
        )

    ; Install
        (set #Msg-Installing "Installerar Picasso96-filer!")

    ; Update
        (set #Msg-Updating "Updaterar existerande installation!")

    ; Delete
        (set #Msg-Deleting "Raderar existerande installation!")

    ; Install Drivers
        (set #CopyDrivers "\nVill du ha drivrutiner för andra program installerade på hårddisken?")
        (set #CopyDriversHelp "Drivrutinerna kommer att installeras i Picasso96-katalogen på din hårddisk för att medge en enkel installation, när/om det behövs.")
        (set #MsgInstallFromHD "\nInstallera programmens drivrutiner från Picasso96-katalogen.")

    ; Install Patches
        (set #InstPrtPatch "\nDo you want to have the P96_PrinterPatch to be automatically started on Boot-Up ?")
        (set #InstPrtPatchHelp "This procedure will copy a project icon to your SYS:WBstartup to start the printer patch automatically.\nThis patch wil solve problems with printing on 24bit screens.")
    )
)

;=============================================================================
; Procedures
;=============================================================================
(procedure P_InstallCard #_boardname
    (
        (if
            (OR (= #_installmode #ModeInstall) (= #_installmode #ModeUpdate))
            (
                (copylib
                    (prompt (#CopyCard #_boardname))
                    (help #CopyCardHelp)
                    (source (tackon "libs/Picasso96/" (cat #_boardname ".card")))
                    (dest #_libsPicasso96path)
                    (confirm)
                )
                (set #_iconpath (tackon #_monitorpath #_boardname))
                (if
                    (= 1 (exists #_iconpath))
                    (
                        ; kind of update, keep icon
                        (copylib
                            (prompt (#CopyMonitor #_boardname))
                            (help #CopyMonitorHelp)
                            (source "devs/monitors/Picasso96")
                            (dest #_monitorpath)
                            (newname #_boardname)
                            (confirm)
                        )
                        (tooltype
                            (prompt (#MonitorToolType #_boardname))
                            (help #MonitorToolTypeHelp)
                            (dest #_iconpath)
                            (settooltype "BoardType" #_boardname)
                            (settooltype "SettingsFile" #_settingsname)
                            (confirm)
                        )
                    )
                    (
                        ; install new, copy with icon
                        (copylib
                            (prompt (#CopyMonitor #_boardname))
                            (help #CopyMonitorHelp)
                            (source "devs/monitors/Picasso96")
                            (dest #_monitorpath)
                            (newname #_boardname)
                            (confirm)
                            (infos)
                        )
                        (tooltype
                            (prompt (#MonitorToolType #_boardname))
                            (help #MonitorToolTypeHelp)
                            (dest #_iconpath)
                            (settooltype "(DisplayChain" "Yes)")
                            (settooltype "IgnoreMask" "Yes")
                            (settooltype "(SoftSprite" "Yes)")
                            (settooltype "(BigSprite" "Yes)")
                            (settooltype "(BorderBlank" "Yes)")
                            (settooltype "SettingsFile" #_settingsname)
                            (settooltype "BoardType" #_boardname)
                            (noposition)
                            (confirm)
                        )
                    )
                )
            )
        )
        (if (= #_installmode #ModeUninstall)
            (delete
                (tackon #_libsPicasso96path
                    (cat #_boardname ".card")
                )
                (tackon #_monitorpath #_boardname)
                (tackon #_monitorpath
                    (cat #_boardname ".info")
                )
            )
        )
    )
)

;=============================================================================
(procedure P_InstallChip #_chipname

    (if (OR (= #_installmode #ModeInstall) (= #_installmode #ModeUpdate))
        (copylib
            (prompt (#CopyChip #_chipname))
            (help #CopyChipHelp)
            (source (tackon "libs/Picasso96/" (cat #_chipname ".chip")))
            (dest #_libsPicasso96path)
            (confirm)
        )
    )

    (if (= #_installmode #ModeUninstall)
        (delete
            (tackon #_libsPicasso96path
                (cat #_chipname ".chip")
            )
        )
    )
)

;=============================================================================
(procedure P_SearchBoards

    ;*********************
    ; check boards

    (set #_boards 0)

    ;*********************
    ; CyberVision3D: ZorroIII: 67
    (set #_CyberVisionCnt (run "FindBoard 8512 67" (safe)))
    (if
        (> #_CyberVisionCnt 0)
        (set #_boards (BITOR #_boards #CyberVision3DBit))
    )

    ;*********************
    ; CyberVision: mem:34/regs:35
    (set #_CyberVisionCnt (run "FindBoard 8512 34" (safe)))
    (if
        (> #_CyberVisionCnt 0)
        (set #_boards (BITOR #_boards #CyberVision64Bit))
    )

    ;*********************
    ; Domino: mem:1/regs:2
    (set #_DominoCnt (run "FindBoard 2167 1" (safe)))
    (if
        (> #_DominoCnt 0)
        (set #_boards (BITOR #_boards #DominoBit))
    )

    ;*********************
    ; Graffity: mem:33/regs:34
    (set #_GraffityCnt (run "FindBoard 2092 33" (safe)))
    (if
    (> #_GraffityCnt 0)
        (set #_boards (BITOR #_boards #GraffityBit))
    )

    ;*********************
    ; Merlin: mem:3/regs:4
    (set #_MerlinCnt (run "FindBoard 2117 3" (safe)))
    (if
        (> #_MerlinCnt 0)
        (set #_boards (BITOR #_boards #MerlinBit))
    )

    ;*********************
    ; oMniBus: there can only be one!
    (if
        (run "FindBoard 2181 0" (safe))
        (
            (set #_oMniBusCnt 1)
            (set #_boards (BITOR #_boards #oMniBusBit))
        )
    )

    ;*********************
    ; PicassoII: mem:11/regs:12
    (set #_PicassoIICnt (run "FindBoard 2167 11" (safe)))
    (if
        (> #_PicassoIICnt 0)
        (set #_boards (BITOR #_boards #PicassoIIBit))
    )

    ;*********************
    ; PicassoIV: 21/22/23/24
    (set #_PicassoIVCnt (+ (run "FindBoard 2167 21" (safe)) (run "FindBoard 2167 24" (safe))))
    (if
        (> #_PicassoIVCnt 0)
        (set #_boards (BITOR #_boards #PicassoIVBit))
    )

    ;*********************
    ; Piccolo: mem:5/regs:6
    (set #_PiccoloCnt (run "FindBoard 2195 5" (safe)))
    (if
        (> #_PiccoloCnt 0)
        (set #_boards (BITOR #_boards #PiccoloBit))
    )

    ;*********************
    ; PiccoloSD64: mem:10/regs:11
    (set #_PiccoloSD64Cnt (run "FindBoard 2195 10" (safe)))
    (if
        (> #_PiccoloSD64Cnt 0)
        (set #_boards (BITOR #_boards #PiccoloSD64Bit))
    )

    ;*********************
    ; Pixel64: mem:255/regs:254
    (set #_Pixel64Cnt (run "FindBoard 2026 255" (safe)))
    (if
        (> #_Pixel64Cnt 0)
        (set #_boards (BITOR #_boards #Pixel64Bit))
    )

    ;*********************
    ; RetinaBLTZ3: 16
    (set #_RetinaCnt (run "FindBoard 18260 16" (safe)))
    (if
        (> #_RetinaCnt 0)
        (set #_boards (BITOR #_boards #RetinaBLTZ3Bit))
    )

    ;*********************
    ; Spectrum: mem:1/regs:2
    (set #_SpectrumCnt (run "FindBoard 2193 1" (safe)))
    (if
        (> #_SpectrumCnt 0)
        (set #_boards (BITOR #_boards #SpectrumBit))
    )

    ;*********************
    ; uaegfx: 96
    (if
        (run "FindBoard 2011 96" (safe))
        (
            (set #_uaegfxCnt 1)
            (set #_boards (BITOR #_boards #uaegfxBit))
        )
    )

    ;*********************
    ; user selects boards

;    (if
;        (= 0 #_boards)
;        (abort #Warning-NoBoards)
;    )
)

;=============================================================================
(procedure P_UserSelectsBoard
    (set #_boards
        (askoptions
            (if
                (= 0 #_installmode)
                (prompt #AskBoards)
            )
            (if
                (= 1 #_installmode)
                (prompt #AskBoardsUp)
            )
            (if
                (= 2 #_installmode)
                (prompt #AskBoardsUn)
            )
            (help #AskBoardsHelp)
            (choices
                "pCyberVision64"
                "CyberVision64/3D"
                "Domino"
                "Graffity"
                "" ; "Inferno"
                "Merlin"
                "oMniBus"
                "PicassoII/II+"
                "PicassoIV"
                "Piccolo"
                "Piccolo SD64"
                "Pixel64"
                "Retina BLT Z3"
                "Spectrum 24"
                "uaegfx"
            )
            (default #_boards)
        )
    )

    (if
        (= #_boards 0)
        (abort #Err-No-Boards)
    )
)

;=============================================================================
(procedure P_GetLibPath
    (set #_pathfound 0)
    (set #_libsPicasso96path (tackon #LibsDefaultPath #Name))

    (if
        (NOT (= #_installmode #ModeInstall))
        (if
            (= (exists #_libsPicasso96path) 2)
            (
                (set #_pathfound 1)
                (set #_libpath #LibsDefaultPath)
            )
        )
    )

    (if
        (= #_pathfound 0)
        (
            (if
                (askbool
                    (if
                        (= #_installmode #ModeInstall)
                        (prompt #AskLibPath)
                    )
                    (if
                        (OR (= #_installmode #ModeUpdate) (= #_installmode #ModeUninstall))
                        (prompt #AskLibPathUp)
                    )
                    (help #AskLibPathHelp)
                    (choices #LibsDefaultPath #AskLibPathUser)
                )
                (set #_libpath #LibsDefaultPath)
                (set #_libpath
                    (askdir
                        (if
                            (= #_installmode #ModeInstall)
                            (prompt #SelectLibDir)
                        )
                        (if
                            (OR (= #_installmode #ModeUpdate) (= #_installmode #ModeUninstall))
                            (prompt #SelectLibDir)
                        )
                        (help #SelectLibDirHelp)
                        (default #LibsDefaultPath)
                    )
                )
            )
            (set #_libsPicasso96path (tackon #_libpath #Name))
        )
    )
)

;=============================================================================
(procedure P_GetMonitorPath

    (set #_pathfound 0)

    (if
        (NOT (= #_installmode #ModeInstall))
            (if
                (OR
                    (= (exists (tackon #MonitorsDefaultPath "Cybervision")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "CVision3D")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "Domino")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "Graffity")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "Inferno")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "Merlin")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "oMniBus")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "PicassoII")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "PicassoIV")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "Piccolo")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "PiccoloSD64")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "Pixel64")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "RetinaBLT")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "Spectrum")) 1)
                    (= (exists (tackon #MonitorsDefaultPath "uaegfx")) 1)
                )
                (
                    (set #_pathfound 1)
                    (set #_monitorpath #MonitorsDefaultPath)
                )
            )
    )

    (if
        (= #_pathfound 0)
        (
            (if
                (askbool
                    (if (= #_installmode #ModeInstall)
                        (prompt #AskMonitorPath)
                    )
                    (if (OR (= #_installmode #ModeUpdate) (= #_installmode #ModeUninstall))
                        (prompt #AskMonitorPathUp)
                    )
                    (help #AskMonitorPathHelp)
                    (choices #AskMonitorPathMonitors #AskMonitorPathUser)
                )
                (set #_monitorpath #MonitorsDefaultPath)
                    (set #_monitorpath
                    (askdir
                        (if (= #_installmode #ModeInstall)
                            (prompt #SelectMonitorDir)
                        )
                        (if (OR (= #_installmode #ModeUpdate) (= #_installmode #ModeUninstall))
                            (prompt #SelectMonitorDir)
                        )
                        (help #SelectMonitorDirHelp)
                        (default #MonitorsDefaultPath)
                    )
                )
            )
        )
    )
)

;=============================================================================
(procedure P_GetPrefsPath
    (set #_pathfound 0)

    (if
        (NOT (= #_installmode #ModeInstall))
            (if
                (= (exists (tackon #PrefsDefaultPath "Picasso96Mode")) 1)
                (
                    (set #_pathfound 1)
                    (set #_prefspath #PrefsDefaultPath)
                )
            )
    )

    (if
        (= #_pathfound 0)
        (if
            (askbool
                (if (= #_installmode #ModeInstall)
                    (prompt #AskPrefsPath)
                )
                (if (OR (= #_installmode #ModeUpdate) (= #_installmode #ModeUninstall))
                    (prompt #AskPrefsPathUp)
                )
                (help #AskPrefsPathHelp)
                (choices #AskPrefsPathPrefs #AskPrefsPathUser)
            )
            (set #_prefspath #PrefsDefaultPath)
            (set #_prefspath
                (askdir
                    (if (= #_installmode #ModeInstall)
                        (prompt #SelectPrefsDir)
                    )
                    (if (OR (= #_installmode #ModeUpdate) (= #_installmode #ModeUninstall))
                        (prompt #SelectPrefsDirUp)
                    )
                    (help #SelectPrefsDirHelp)
                    (default #PrefsDefaultPath)
                )
            )
        )
    )
)

;=============================================================================
(procedure P_GetSettingsPath
    (set #_pathfound 0)

    (if
        (NOT (= #_installmode #ModeInstall))
            (if
                (= (exists #SettingsDefaultName) 1)
                (
                    (set #_pathfound 1)
                    (set #_settingsname #SettingsDefaultName)
                )
            )
    )

    (if
        (= #_pathfound 0)
        (if
            (askbool
                (if
                    (= #_installmode #ModeInstall)
                    (prompt #AskSettingsPath)
                )
                (if
                    (OR (= #_installmode #ModeUpdate) (= #_installmode #ModeUninstall))
                    (prompt #AskSettingsPathUp)
                )
                (help #AskSettingsPathHelp)
                (choices #AskSettingsPathDevs #AskSettingsPathUser)
            )
            (set #_settingsname #SettingsDefaultName)
            (set #_settingsname
                (tackon
                    (askdir
                        (if
                            (= #_installmode #ModeInstall)
                            (prompt #SelectSettingsDir)
                        )
                        (if
                            (OR (= #_installmode #ModeUpdate) (= #_installmode #ModeUninstall))
                            (prompt #SelectSettingsDirUp)
                        )
                        (help #SelectSettingsDirHelp)
                        (default (pathonly #SettingsDefaultName))
                    )
                    (fileonly #SettingsDefaultName)
                )
            )
        )
    )
)

;=============================================================================
(procedure P_GetCopySettings

    (set #_copysettings 1)
    (if
        (exists #_settingsname (noreq))
        (if
            (askbool
                (prompt #AskSettingsCopy)
                (help #AskSettingsCopyHelp)
                (choices #Keep #Overwrite)
            )
            (set #_copysettings 0)
            (set #_copysettings 2)
        )
    )
)

;=============================================================================
(procedure P_GetMainPath
    (set #_pathfound 0)

    (if
        (NOT (= #_installmode #ModeInstall))
            (if
                (set #_mainpath
                    (getassign #MainPath)
                )
                (
                    (set #_pathfound 1)
                    (set #_mainpathroot
                        (pathonly #_mainpath)
                    )
                )
            )
    )

    (if
        (= #_pathfound 0)
        (
            (if
                (= #_installmode #ModeInstall)
                (
                    (set #MainDefaultDir (tackon #MainDefaultPath #MainPath))
                    (if
                        (askbool
                            (prompt #AskMainPath)
                            (help #AskMainPathHelp)
                            (choices #MainDefaultDir #AskMainPathUser)
                        )
                        ; default
                        (set #_mainpathroot #MainDefaultPath)
                        ; user selected
                        (set #_mainpathroot
                            (askdir
                                (prompt #SelectMainDir)
                                (help #SelectMainDirHelp)
                                (default #MainDefaultPath)
                                (newpath)
                                (disk)
                            )
                        )
                    )
                    (set #_mainpath (tackon #_mainpathroot #MainPath))
                    (if
                        (= (exists #_mainpath (noreq)) 0)
                        (makedir #_mainpath)
                    )
                )
            )
            (if
                (OR (= #_installmode #ModeUpdate) (= #_installmode #ModeUninstall))
                (
                    (set #_mainpathroot
                        (askdir
                            (prompt #AskMainPathUp)
                            (help #SelectMainDirHelp)
                            (default #MainDefaultPath)
                            (disk)
                        )
                    )
                    (set #_mainpath (tackon #_mainpathroot #MainPath))
                )
            )
            (makeassign #MainPath #_mainpath)
        )
    )
)

;=============================================================================
(procedure P_InstallApplicationDrivers

    (copyfiles
        (source "drivers")
        (dest #_mainpath)
        (all)
    )
    (if
        (= 1 (exists (tackon #_mainpath "ShapeShifter")))
        (tooltype
            (prompt #DriversToolType)
            (help #DriversToolTypeHelp)
            (dest (tackon #_mainpath "ShapeShifter"))
            (noposition)
            (confirm)
        )
    )
    (if
        (= 1 (exists (tackon #_mainpath "ADPro")))
        (tooltype
            (prompt #DriversToolType)
            (help #DriversToolTypeHelp)
            (dest (tackon #_mainpath "ADPro"))
            (noposition)
            (confirm)
        )
    )
    (if
        (= 1 (exists (tackon #_mainpath "Photogenics")))
        (tooltype
            (prompt #DriversToolType)
            (help #DriversToolTypeHelp)
            (dest (tackon #_mainpath "Photogenics"))
            (noposition)
            (confirm)
        )
    )
    (if
        (= 1 (exists (tackon #_mainpath "XiPaint")))
        (tooltype
            (prompt #DriversToolType)
            (help #DriversToolTypeHelp)
            (dest (tackon #_mainpath "XiPaint"))
            (noposition)
            (confirm)
        )
    )
    (message
        #MsgInstallFromHD
        (all)
    )
)

;=============================================================================
(procedure P_InstallLibs

    ; copy Picasso96API.library
    (copylib
        (prompt #CopyPicasso96API)
        (help #CopyPicasso96APIHelp)
        (source "libs/Picasso96API.library")
        (dest #_libpath)
        (confirm)
    )

    ; copy rtg.library
    (copylib
        (prompt #CopyRtg)
        (help #CopyRtgHelp)
        (source "libs/Picasso96/rtg.library")
        (dest #_libsPicasso96path)
        (confirm)
    )

    ; copy fastlayers.library
    (copylib
        (prompt #CopyFL)
        (help #CopyFLHelp)
        (source "libs/Picasso96/fastlayers.library")
        (dest #_libsPicasso96path)
        (confirm)
    )

    ; copy emulation.library
    (copylib
        (prompt #CopyEmuLib)
        (help #CopyEmuLibHelp)
        (source "libs/Picasso96/emulation.library")
        (dest #_libsPicasso96path)
        (confirm)
    )
)

;=============================================================================
(procedure P_InstallPicasso96Mode

    (copylib
        (prompt #CopyPicasso96Mode)
        (help #CopyPicasso96ModeHelp)
        (source "Prefs/Picasso96Mode")
        (dest #_prefspath)
        (confirm)
        (infos)
    )
    (tooltype
        (prompt #Picasso96ModeIconType)
        (help #Picasso96ModeIconTypeHelp)
        (dest (tackon #_prefspath "Picasso96Mode"))
        (settooltype "SettingsFile" #_settingsname)
        (noposition)
        (confirm)
    )
)

;=============================================================================
(procedure P_InstallHardwareDrivers

    (if
        (BITAND #_boards #CyberVision64Bit)
        (P_InstallChip "S3Trio64")
    )

    (if
        (BITAND #_boards #CyberVision3DBit)
        (P_InstallChip "S3ViRGE")
    )

    (if
        (BITAND #_boards (+ #DominoBit #oMniBusBit))
        (P_InstallChip "TsengET4000")
    )

    (if
        (BITAND #_boards (+ #MerlinBit #oMniBusBit))
        (P_InstallChip "TsengET4000W32")
    )

    (if
        (BITAND #_boards (+ #GraffityBit #PicassoIIBit #PiccoloBit #SpectrumBit))
        (P_InstallChip "CirrusGD542X")
    )

    (if
        (BITAND #_boards (+ #InfernoBit #PicassoIVBit))
        (P_InstallChip "CirrusGD5446")
    )

    (if
        (BITAND #_boards (+ #PiccoloSD64Bit #Pixel64Bit))
        (P_InstallChip "CirrusGD5434")
    )

    (if
        (BITAND #_boards #RetinaBLTZ3Bit)
        (P_InstallChip "NCR77C32BLT")
    )

    (if
        (BITAND #_boards #CyberVision64Bit)
        (P_InstallCard "CyberVision")
    )

    (if
        (BITAND #_boards #CyberVision3DBit)
        (P_InstallCard "CVision3D")
    )

    (if
        (BITAND #_boards #DominoBit)
        (P_InstallCard "Domino")
    )

    (if
        (BITAND #_boards #GraffityBit)
        (P_InstallCard "Graffity")
    )

    (if
        (BITAND #_boards #InfernoBit)
        (P_InstallCard "Inferno")
    )

    (if
        (BITAND #_boards #MerlinBit)
        (P_InstallCard "Merlin")
    )

    (if
        (BITAND #_boards #oMniBusBit)
        (P_InstallCard "oMniBus")
    )

    (if
        (BITAND #_boards #PicassoIIBit)
        (P_InstallCard "PicassoII")
    )

    (if
        (BITAND #_boards #PicassoIVBit)
        (P_InstallCard "PicassoIV")
    )

    (if
        (BITAND #_boards #PiccoloBit)
        (P_InstallCard "Piccolo")
    )

    (if
        (BITAND #_boards #PiccoloSD64Bit)
        (P_InstallCard "PiccoloSD64")
    )

    (if
        (BITAND #_boards #Pixel64Bit)
        (P_InstallCard "Pixel64")
    )

    (if
        (BITAND #_boards #RetinaBLTZ3Bit)
        (P_InstallCard "RetinaBLT")
    )

    (if
        (BITAND #_boards #SpectrumBit)
        (P_InstallCard "Spectrum")
    )

    (if
        (BITAND #_boards #uaegfxBit)
        (P_InstallCard "uaegfx")
    )

)

;=============================================================================
(procedure P_InstallPDT

    ; backup old or wrong version of the picture.datatype first
    (if
        (= (exists "SYS:Classes/Datatypes/picture.datatype") 1)
        (
            ; there is an old one
            (if
                (< (getversion "SYS:Classes/Datatypes/picture.datatype") (* 43 65536))
                (
                    (if
                        ; old picture.datatype
                        (NOT (exists "SYS:Classes/Datatypes/picture.datatype.old"))
                        (copyfiles
                            (prompt #CopyPDT)
                            (help #CopyPDTHelp)
                            (source "SYS:Classes/Datatypes/picture.datatype")
                            (dest "SYS:Classes/Datatypes")
                            (newname "picture.datatype.old")
                        )
                    )
                )
                (
                    (if
                        (> (getversion "SYS:Classes/Datatypes/picture.datatype") (+ (* 43 65536) 500))
                        (if
                            ; CGfx v43 picture.datatype does not work with Picasso96
                            (NOT (exists "SYS:Classes/Datatypes/picture.datatype.cgfx"))
                            (rename "SYS:Classes/Datatypes/picture.datatype" "SYS:Classes/Datatypes/picture.datatype.cgfx"
                                (prompt #CopyPDT)
                                (help #CopyPDTHelp)
                            )
                            (delete
                                "SYS:Classes/Datatypes/picture.datatype"
                                (prompt #CopyPDT)
                                (help #CopyPDTHelp)
                                (optional force)
                            )
                        )
                    )
                )
            )
        )
    )

    (copylib
        (prompt #CopyPDT)
        (help #CopyPDTHelp)
        (source "Classes/Datatypes/picture.datatype")
        (dest "SYS:Classes/Datatypes")
        (confirm)
    )

)

;=============================================================================
(procedure P_CopyApplications

    (copyfiles
        (prompt #CopyApps)
        (help #CopyAppsHelp)
        (source "Picasso96")
        (dest #_mainpath)
        (infos)
        (all)
    )

    (if
        (OR (= @language "svenska") (= @language "français"))
        (
            ; there is no swedish translation yet
            (copyfiles
                (prompt #CopyApps)
                (help #CopyAppsHelp)
                (source "Documentation/Picasso96_english.guide")
                (dest #_mainpath)
                (infos)
            )
        )
        (copyfiles
            (prompt #CopyApps)
            (help #CopyAppsHelp)
            (source (cat "Documentation/Picasso96_" @language ".guide"))
            (dest #_mainpath)
            (infos)
        )
    )

    (if
        (= (exists "Version") 1)
        (
            (copyfiles
                (source "Version")
                (dest #_mainpath)
            )
        )
    )

    (if
        (= #_instprtpatch 1)
        (if
            (= (exists (tackon #_mainpath "P96_PrinterPatch.icon")) 1)
            (
                (copyfiles
                    (source (tackon #_mainpath "P96_PrinterPatch.icon"))
                    (dest "SYS:WBStartup")
                    (newname "P96_PrinterPatch.info")
                )
            )
        )
    )

)

;=============================================================================
(procedure P_CopySettings

    (set #_monitor 1)

    (set #_olduserlevel @user-level)
    (user 1)

    (set #_monitor
        (askchoice
            (prompt #AskMonitor)
            (help #AskMonitorHelp)
            (choices    #15kHzMonitor #31kHzMonitor #35kHzMonitor #38kHzMonitor
                        #48kHzMonitor #57kHzMonitor #64kHzMonitor)
            (default 1)
        )
    )

    (user #_olduserlevel)

    (if
        (= #_copysettings 2)
        (copyfiles
            (prompt #CopySettings)
            (help #CopySettingsHelp)
            (source #_settingsname)
            (dest (pathonly #_settingsname))
            (newname (cat (fileonly #_settingsname) ".bak"))
        )
    )
    ; copy settings file
    (set #_settingssource
        (select #_monitor
            "devs/Picasso96Settings.15"
            "devs/Picasso96Settings.31"
            "devs/Picasso96Settings.35.5"
            "devs/Picasso96Settings.38"
            "devs/Picasso96Settings.48"
            "devs/Picasso96Settings.57"
            "devs/Picasso96Settings.64"
        )
    )

    (if
        (NOT (= #_copysettings 0))
        (copyfiles
            (prompt #CopySettings)
            (help #CopySettingsHelp)
            (source #_settingssource)
            (dest (pathonly #_settingsname))
            (newname (fileonly #_settingsname))
        )
    )
)

;=============================================================================
(procedure P_ModUserStartup

    (startup @app-name
        (prompt #AddUserStartup)
        (help #AddUserStartupHelp)
        (if
            (OR (= #_installmode #ModeInstall) (= #_installmode #ModeUpdate))
            (command (cat "Assign " #MainPath ": \"" #_mainpath "\""))
        )
    )
)

;=============================================================================
; main installation routine
;=============================================================================

(message #Message)

(if
    (< (getversion) (* #MinSysVersion 65536))
    (abort #Err-Bad-Kick)
)

(if
    (patmatch "68000|68010" (database "cpu"))
    (abort #Err-Bad-Cpu)
)


(set #_installmode
    (askchoice
        (prompt #InstallMode)
        (help #InstallModeHelp "\n\n" @askoptions-help)
        (choices
            #Install
            #Update
            #Uninstall
        )
        (if
            (getassign #MainPath)
            (default 1)
            (default 0)
        )
    )
)

(complete 5)

(welcome)

(P_SearchBoards)

;*********************

(if
    (= #_installmode #ModeInstall)
    (
        (complete 10)

        (message #StartupMsg1 (all))

        (complete 15)

        (message #StartupMsg2 (all))

        (complete 20)
        (set #_olduserlevel @user-level)
        (user 1)
        (if
            (askbool
                (prompt    #StartupMsg3)
                (help        #StartupHelp3)
            )
            (
                (if
                    (= @language "english")
                    (
                        (run "SYS:Utilities/MultiView Documentation/Picasso96_english.guide" (safe))
                    )
                )
                (if
                    (= @language "deutsch")
                    (
                        (run "SYS:Utilities/MultiView Documentation/Picasso96_deutsch.guide" (safe))
                    )
                )
                (if
                    (= @language "français")
                    (
                        (run "SYS:Utilities/MultiView Documentation/Picasso96_italiano.guide" (safe))
                    )
                )
                (if
                    (= @language "italiano")
                    (
                        (run "SYS:Utilities/MultiView Documentation/Picasso96_italiano.guide" (safe))
                    )
                )
                (if
                    (= @language "svenska")
                    (
                        (run "SYS:Utilities/MultiView Documentation/Picasso96_english.guide" (safe))
                    )
                )
            )
        )
        (user #_olduserlevel)

        (complete 30)
        ;*********************
        ; install

        (P_UserSelectsBoard)


        ;*********************
        ; get paths


        (P_GetLibPath)
        (complete 35)
        (P_GetMonitorPath)
        (complete 40)
        (P_GetPrefsPath)
        (complete 45)
        (P_GetSettingsPath)
        (complete 50)
        (P_GetCopySettings)
        (complete 55)
        (P_GetMainPath)
        (complete 60)

        (set #_copydrivers
            (askbool
                (prompt #CopyDrivers)
                (help #CopyDriversHelp)
            )
        )

        (set #_instprtpatch
            (askbool
                (prompt #InstPrtPatch)
                (help #InstPrtPatchHelp)
            )
        )

        (complete 65)

        ;*********************
        ; finally install...

        (complete #Msg-Installing)

        ; make applications directory
        (if
            (= 0 (exists #_mainpath))
            (makedir #_mainpath
                (prompt #Picasso96HomeDir)
                (help #Picasso96HomeDirHelp)
                (confirm)
            )
        )

        ; set application path to get install_log_file there
        (set @default-dest #_mainpath)

        ; copy applications

        (P_CopyApplications)
        (complete 70)

        ; makedir libs/Picasso96
        (if
            (= 0 (exists #_libsPicasso96path))
            (makedir #_libsPicasso96path
                (prompt #Picasso96Dir)
                (help #Picasso96DirHelp)
                (confirm)
            )
        )

        ; Copy Libraries

        (P_InstallLibs)
        (complete 75)

        ; copy picture.datatype

        (P_InstallPDT)
        (complete 80)

        ; install chip and card drivers

        (P_InstallHardwareDrivers)
        (complete 85)

        ; copy Picasso96Mode

        (P_InstallPicasso96Mode)
        (complete 90)

        ; backup & copy settings file

        (if
            (NOT (= #_copysettings 0))
            (P_CopySettings)
        )
        (complete 95)

        ; modify user-startup

        (P_ModUserStartup)
        (complete 97)

        ; copy drivers to harddisk
        (if
            (= #_copydrivers 1)
            (P_InstallApplicationDrivers)
        )
        (complete 100)

        (exit #InstEnd)
    )
)

(if
    (= #_installmode #ModeUpdate)
    (
        (complete 10)
        (set #_update
            (askoptions
                (prompt #UpdateSel)
                (help #UpdateSelHelp)
                (choices
                    #UpUnGfx
                    #UpUnLib
                    #UpUnPdt
                    #UpUnPMd
                    #UpUnAppl
                    #UpUnDriv
                    #UpUnMoni
                    #UpUstart
                )
                (default 63)
            )
        )
        (complete 25)

        (if
            (BITAND #_update 1)
            (P_UserSelectsBoard)
        )

        (complete 30)

        (if
            (BITAND #_update (+ 1 2))
            (P_GetLibPath)
        )

        (complete 35)

        (if
            (BITAND #_update 1)
            (P_GetMonitorPath)
        )

        (complete 40)

        (if
            (BITAND #_update 8)
            (P_GetPrefsPath)
        )

        (complete 45)

        (if
            (BITAND #_update (+ 1 8 64))
            (P_GetSettingsPath)
        )

        (complete 50)

        (if
            (BITAND #_update 64)
            (P_GetCopySettings)
        )

        (complete 55)

        ; mainpath is always needed
        (P_GetMainPath)

        ; set application path to get install_log_file there
        (set @default-dest #_mainpath)

        (complete 60)

        (if
            (BITAND #_update 1)
            (P_InstallHardwareDrivers)
        )

        (complete 65)

        (if
            (BITAND #_update 2)
            (P_InstallLibs)
        )

        (complete 70)

        (if
            (BITAND #_update 4)
            (P_InstallPDT)
        )

        (complete 75)

        (if
            (BITAND #_update 8)
            (P_InstallPicasso96Mode)
        )

        (complete 80)

        (if
            (BITAND #_update 16)
            (
            (set #_instprtpatch 0)
            (if (= (exists "SYS:WBStartup/P96_PrinterPatch.info") 0)
                (set #_instprtpatch
                    (askbool
                        (prompt #InstPrtPatch)
                        (help #InstPrtPatchHelp)
                    )
                )
            )
            (P_CopyApplications)
            )
        )

        (complete 85)

        (if
            (BITAND #_update 32)
            (P_InstallApplicationDrivers)
        )

        (complete 90)

        (if
            (BITAND #_update 64)
            (if (NOT (= #_copysettings 0))
                (P_CopySettings)
            )
        )

        (complete 95)

        (if
            (BITAND #_update 128)
            (P_ModUserStartup)
        )

        (complete 100)
        (exit #UpdEnd)
    )
)

(if
    (= #_installmode #ModeUninstall)
    (
        (complete 5)
        (set #_uninstall
            (askoptions
                (prompt #UninstallSel)
                (help #UninstallSelHelp)
                (choices
                    #UpUnGfx
                    #UpUnLib
                    #UpUnPdt
                    #UpUnPMd
                    (cat #UpUnAppl " & " #UpUnDriv)
                    #UpUnMoni
                )
                (default #_uninstall)
            )
        )

        (complete 10)
        (if
            (askbool
                (prompt #AskUninstall)
                (help #AskUninstallHelp)
                (choices #AskUnyes #AskUnno)
            )
            (
                (complete 15)

                (if
                    (BITAND #_uninstall 1)
                    (P_UserSelectsBoard)
                )

                (complete 20)

                (if
                    (BITAND #_uninstall (+ 1 2))
                    (P_GetLibPath)
                )

                (complete 25)

                (if
                    (BITAND #_uninstall 1)                    (P_GetMonitorPath)
                )

                (complete 35)

                (if
                    (BITAND #_uninstall 8)
                    (P_GetPrefsPath)
                )

                (complete 40)

                (if
                    (BITAND #_uninstall 32)
                    (P_GetSettingsPath)
                )

                (complete 45)

                ; we always use the main directory for install script...
                (P_GetMainPath)

                (complete 55)

                (if
                    (BITAND #_uninstall 1)
                    (P_InstallHardwareDrivers)
                )

                (complete 65)

                (if
                    (BITAND #_uninstall 2)
                    (delete
                        (tackon #_libpath "Picasso96API.library")
                        (tackon #_libsPicasso96path "rtg.library")
                        (tackon #_libsPicasso96path "fastlayers.library")
                        (tackon #_libsPicasso96path "emulation.library")
                        #_libsPicasso96path
                    )
                )

                (complete 75)

                (if
                    (BITAND #_uninstall 4)
                    (
                        (if
                            (= 1 (exists "SYS:Classes/Datatypes/picture.datatype.old"))
                            (
                                (if
                                    (= 1 (exists "SYS:Classes/Datatypes/picture.datatype"))
                                    (delete "SYS:Classes/Datatypes/picture.datatype")
                                )
                                (rename "SYS:Classes/Datatypes/picture.datatype.old" "SYS:Classes/Datatypes/picture.datatype")
                            )
                        )
                    )
                )

                (complete 85)

                (if
                    (BITAND #_uninstall 8)
                    (delete
                        (tackon #_prefspath "Picasso96Mode")
                        (tackon #_prefspath "Picasso96Mode.info")
                    )
                )

                (complete 90)

                (if
                    (BITAND #_uninstall 16)
                    (
                        (makeassign #MainPath)
                        (run (cat 'delete "' #_mainpath '" "' #_mainpath '.info" ALL'))

                        (if (= (exists "SYS:WBStartup/P96_PrinterPatch.info") 1)
                        (delete "SYS:WBStartup/P96_PrinterPatch.info"))

                        (P_ModUserStartup)

                        ; there will be no more home directory...
                        (set @default-dest "")
                    )
                    (set @default-dest #_mainpath)
                )

                (complete 95)

                (if
                    (BITAND #_uninstall 32)
                    (
                        (if
                            (= 1 (exists (cat #_settingsname ".bak"))
                            (delete (cat #_settingsname ".bak"))
                        )
                        (rename #_settingsname (cat #_settingsname ".bak")))
                    )
                )

                (complete 100)

                (exit #UniEnd)
            )
        )
    )
)